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GANADORES DEL CONCURSO K 64 

Fue difícil elegirlos, porlagran cantidad de trabajos re¬ 
cibidos y por la calidad de los programas. Publicamos 
los nombres de los 5 ganadores y de los que se hicie¬ 
ron acreedores a 15 menciones especiales. 

En pág, 46 



PROGRAMAS INEDITOS 

TS 1000 / 1500 , CZ 1000 / 1500 , TK 83/85 

» Indice de pacientes (pág. 8) 

• Sandwich, Come monstruos. 

* Feliz día (pág. 10) 

Truco (pág. 52) 

Spectrum, TS 2068 y TK 90 X 

• Gate (pág. 48) 

TI 99/4A álL 

# Parábola (.pág, 28) f 

9 Batalla submarina (pág. 32)1,1}, /] 

Commodore 64 

• El juego de la vida (pág. 36) j\ 

* Fugue (pág. 40) 
m Control de Base de Datos 

(pág. 41) 

* Concentración (pág. 42) q 

COMO CARGAR EN CODIGO DE 
MAQUINA 

Soluciones a los muchos problemas que se presentan 
al entrar una rutina o programa en código de máquina 
en el ZX-81. 

En pág, 12 



CARTA DEL DIRECTOR 

bJ¡car Pero^no-VmíIrnos h' aceito a nes ’ 6 nos 9ustaría pu¬ 
co n más páginas, cada díatenímS* n p6sar de contar 
cer a nuestros lectoresiSiíSte ^ ofre- 

mejorsus equipos, Srn embarazo ™ n?* pLíedí3n aprovechar 

tar que nos sentriTTOS muy conten o l ES de|arde resaí ‘ 

sugerencias son tenidas en cueluL niS JS e °^ l0&y las 
ro v js ta E $ pe cía I m e n te de s t t c q ti P^^eccilona r n ue$ tra 

K64 en eJ exterior, Desde Bra'si/'iSwS f CO F ue está teniendo 
con ooí miento de ra MicrodioiW lo, recibimos el fe- 

¡mportarcia del t^aS®tere ¿TlíSIf' ‘a 

Otros positivos comentará j¡f n l?? sa o,lando la edrtorFal. 
ves de un enviado¡ ecagj . mos en Europa, a tra¬ 
tamos alcanzando el objef voíe n'ílS 9 " 1 '-? 13 que e5 ‘ 

internacional nos comprometet rrat^5^ b íC ^ Cfdn de niy eF 

mejores, -promete a tratarde seguir siendo tos 


CÍÜSTJAN PUSSÍ> 



SOFTWARE PARA IMPRESORA 


Segunda nota sobre la interfase para Impresora para 
la TS 2068, 

En pág. 24 


K 64 EN EUROPA 


Fuimos hasta la cuna del soft y del hard que hace eco 
en nuestro continente. 

En pág. 14 


OTRAS NOTAS 


Desentrañando los códigos (pág. 16) 
Ficha técnica de la TK 9GX (pág. 20) 
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Atari presentó nuevos modelos 

Jack Traimel al comando de su nueva compañía, 
presentó en el Consumer Electronics Show de Tos 
Estados Unidos fo que será su nueva estrategia de 
productos durante e! presente año. 

Se trata de dos familias denominadas XE y SL La 
primera compuesta por cuatro modelos no es otra 
cosa que la prolongación de la popular línea XL, 
cuyo modelo más potente era hasta el momento el 
800 XL 

El modelo más bajo de esta nueva serie es el 65 XE, 
que ofrece aparte de una nueva fínea estética, com¬ 
patibilidad totai con ia serie XL, Está desarrollado en 
torno ai microprocesador 6502 Gde MOS Techno¬ 
logy, con 64 Kbytes de RAM. 

Eí resto de las máquinas son muy parecidas entre sí, 
aunque ofrecen diversas especializaciones, Así, Ja 
65 XEM posee especiales cualidades para generar 
sonidos, la 65 XE P es un modelo portátil de Ja 65 XE. 
Incluye un monitor de 5 pelgadasy una unidad Sony 
de 3 1/2", El último modelo déla gama es el 130 XE, 
La única diferencia con el modelo base son los 129 
Kbytes de RAM. 

Por otra parte. Ja serie ST se compone de los 
modelos 130 ST y 520 ST. Estas son las máquinas 
de fa nueva generación de ATARl, ya que incorporan 
el microprocesador de 16/32 bits 68000 de Motoro¬ 
la, Ambas máquinas son muy semejantes salvo por 
los 128 Kbytes de RAM del modelo 130 ST y los 512 
Kbytes del 512 ST. La ROM de ambos equipos es 
idéntica; 192 Kbytes ampliadle a 320 K por medio 
de cartuchos. Los dos equipos disponen de los len¬ 
guajes BASJC y LOGO residentes y una paleta de 
512 coJores, 

El sonido en la serle ST se compone de tres canales 
internos y un interfase para control de sintetizados 
Asimismo esta serie viene provista de un controla¬ 


dor de dískette y una interfase para disco duro, Ade¬ 
más se ofrece una puerta RS-232 otra paralela Cen¬ 
tronics y dos conecto res de joystíck, 

NCR Mejorando lo bueno 

Tras la presentación de su modelo Decisión MateV, 
NCR Introdujo serias mejoras en su sistema opera¬ 
tivo MS-DOS. 

Ahora el sistema soporta hasta cinco periféricos 
conectados vía RS-232 conmutables. La capacidad 
en disco flexible aumenta en 80 Kbytes más y, ade¬ 
más, se dispone de una simulación de disco en 
memoria, lo que aumenta el rendimiento del siste¬ 
ma. 

Se incluyen unidades inteligentes para coplas de 
seguridad y restauración, lo que permite realizar 
copias de seguridad totales o parciales de los dis¬ 
cos duros sobre los flexibles y su posterior recu¬ 
peración. 

Otra mejora radica en el software, que trata la pan¬ 
talla aumentando el rendimiento total del sistema 
en aplicaciones como Wordstar en casi un 40%. 
Igualmente se han introducido mejoras sobre i a 
versión de CP/M de ese computador, soporta ahora 
unidades de disco flexible de 96 pistas por pulgada. 
Se consigue así una capacidad de almacenamiento 
de 800 Kbytes formateados. 

Commodore a la cabeza 

Desde Europa, nos han llegado noticias sobre Ja 
publicación de la participación en el mercado mun¬ 
dial de ios productos COMMODORE dentro del 
sector de ordenadores para e! hogar y personales. 
En cifras absolutas, estos datos se concretan en u n 
parque instaiado de más de 6 millones de máquinas 
modelo COMMODORE C-64 en todo ef mundo. 


Pág. 4 


K04 



L 


























Lo nuevo de Sinclair se llama C5 

Olive Sinclair acaba de lanzar lo que e$ su último 
invento, no se trata de un nuevo modelo de compu¬ 
tador ni cosa parecida. El C5 es, nada más ni nada 
menos que un modernistmo y futurista medio de 
transporte para un solo pasajero. Se trata de un tri¬ 
ciclo que se mueve gradas a una batería de ácido y 
plomo que pesa 15 kilos y es similar a la de ios 
automóviles. Su peso es de unos 45 kilos, mide SO 
cm, de ancho por 80 cm, de alto y aprox.2 metros de 
largo. En lugar de volante,se ha previsto un manillar 
con frenos tipo bicicleta y el acelerador se acciona 
apretando un botón, 

Los pies quedan apoyados muy cerca de unos pe¬ 
dales (muy útiles en caso de una falla en el sistema 
motriz), 

En la parte trasera de este vehículo existe un espa¬ 


cio de aprox. 30,5 cm. cúbicos para carga (libros, 
compras, etc.). 

El conjunto se completa con faros, delantero y tra¬ 
sero y espejos retrovisores. 

El diseño de este vehículo, descubierto por cierto, 
fue llevado a cabo en el mayor de los secretos, se 
buscaba un aparato moderno de muy bajo costo, 
suficiente para transportar un pasajero en despla¬ 
zamientos cortos, La carrocería es obra de los me¬ 
jores d i señad ores tari tá n icos, c on la co I a bo ración de 
la casa Lotus. 

La velocidad máxima es de unos 25 Krn/h y la carga 
de batería es suficiente para unos 40 Km, Para re¬ 
cargarla, son necesarias ocho horas, por fo que se 
aconseja disponer de dos. 

Una ventaja es la de no ser necesaria la licencia, 
porque este vehículo se lo considera a pedal. 

El éxito de venta de este nuevo vehículo lo afirman 
los 1000 C5 vendidos en sólo la primera semana de 
su comercialización. 
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“EXPOFICINA ’B5 n 


Si por fa exitosa trayectoria cumplida a través de 
sus realización desde 1969 en que tuvo lugar fa pri¬ 
mera edición, EXPQFICINA no estuviera ya impuesta 
como exposición cumbre de las tecnologías que 
componensu temática, fa décima versión presenta¬ 
da por CAMOCA r con 85 lotes desarrollados sobre 
7.000 metros cuadrados dei pabellón del Centro Mu¬ 
nicipal de Exposiciones, sería suficiente para consi- 
derarla merecedora del título de esta nota. 


Anunciada su realización en momentos en que se ini¬ 
ciaba la lucha contra la inflación y se procedía a la 
apertura de las propuestas presentadas en el Con¬ 
curso Público convocado por la Resolución N* 44/85 
de la Secretaría de industria para la puesta en 
marcha de la Industria informática Nacional, "EX PO 
OFICINA ’Sñ' 1 congregó a las principales empresas 
del sector vinculado con la informática, las comuni¬ 
caciones y la organización de oficinas, incluyendo a 
las empresas participantes en el mencionado con¬ 
curso y, contagió su entusiasmo a fas empresas que 
por uno u otro motivo no expusieron en la muestra 
pero que, en forma tácita, adhirieron publicitariamen- 
tea la manifestación de pujanza y fe inquebrantable 
en el futuro del país. 


Stand de K64 en ExpofíciJia 


U n público estimado en más de 90.000 personas re¬ 
corrió las instalaciones durante los 10 días en que 
estuvo abierta esta muestra singular. 


Juan Carlos. Lopgz Yenes y Marcelina Delgadda, 
vi ce presi denle y gerente respectivamente de Camoca, 


CAMOCA se ha esmerado también en la difusión pu¬ 
blicitaria de la muestra, tanto en las provincias como 
en laQapital Federal ? y ha facilitado emisiones radia¬ 
les directamente desde la exposición, fa filmación de 
Video Tapes para Cable Visión y el Canal 7 (Mesa de 
Noticias) y, auspició la edición de importantes Suple¬ 
mentos Especiales dedicados a "EXPOFICINA ’SS" 
por los diarios de ia Capital Federal. 


En efecto, CAMOCA, celosa como siempre de jerar¬ 
quizar la muestra en todo sentido para ofrecer un es¬ 
cenario acorde con el alto nivel del público visitante 
constituido en su gran mayoría por los responsables 
de Ea conducción de la industria, el comercio, la ban¬ 
ca, fa previsión y la administración pública y privada, 
ha ofrecido en esta ocasión un hall de entrada de ca¬ 
racterísticas espectaculares que dió origen a elogio¬ 
sos cementarlos. Con buen criterio ha mantenido la 
“transparencia” de los stands realizados sobriamen¬ 
te pero no exentos de elegancia y novedades de 
construcción, ubicados a la vera de su famoso “cami¬ 
no de circulación ordenada 91 . 
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DESDE CORDOBA HACÍA EL 
PAIS 
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COMPRE SU TK 85/90/2000 EN 3, 6, 10 CUOTAS SIN INTERES 


“THE COMPUTER 
CLUB” 


Le ofrecemos lo mejor para su 
computadora Radio - Shack - Sinclair 
Micro - digital 

Y si Ud. tiene una Commodore, 
alquilamos los programas a muy bajo 
costo. 

Descuento especiales a mayoristas. 


27 de Abril 252-Local 14- Córdoba. 


CONSULTE NUESTRAS OFERTAS DE CONTADO 
m HfJ0R.ES FflD GRAMAS T ACCESORIOS PARA SU COMMOQORi 64 EN GAS ERES Y DISKETTES 

TK V SINCLAIR 


1NPIIT DATA CLUB * Santa Fe 1670 - Loe. 45 


computers i 


CCDVnT Sfl 


AV GAONA 1456 - * 53-3240 
f 1416 ) BUENOS AIRES 


COMPUTADORAS 

• TI 99/4A 

• TK 

• REGISTRADORAS - ROLLOS 

• MEDIOS MAGNETICOS 

• FORMULARIOS CONTINUOS 

• CINTAS IMPRESORAS 

• CGMMODÜRE 64 
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INDICE DE PACIENTES 



CGMP.i CZ 1000/1 500 TK 83/85 
COlMF; 16 K 
OLAS: COMERCIAL 


Este es un programa para llevar el 
registro de pacientes, permitiendo 
registrar además de los datos per- 
sonales, las fechas de entrada, sa¬ 
lida, observaciones, derivaciones 
del paciente, y forma de pago. 
Estas características lo hacen di¬ 
námico y útil, acortando los tiem¬ 
pos de consulta de archivos y brin¬ 
dando un acceso instantáneo a la 
información. 

Luego de la carga del programa, 
aparecerá un menú principal con 
nueve ttems, que indican los dis¬ 
tintos trabajos que puede realizar 
este programa; sólo hay que pulsar 
el número de la opción elegida. 
Para volver al menú principal habrá 
que pulsar la teda 0 . 
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ORINT HT - G 


21 =E 3 
4 i ‘ = E s 


:-: z:c: 

GPT J t 


13GE HE>-T ,■ 

1.305 \3 3 5 ¡J E 500 
1307 Gj-i 5 

4330 GD5UB 3 0 3 

4331 LET BB-BB+5 

1322 IF ee;12 THet-J 53*JB 

1 -Z £¿ 4 G-_! ■ 0 4 -7-0S 

11GG GOÍUB £40 

1101 Ck_S 

n0£ LET BB=0 

H03 F-jR =17! - 

t F ,i 5 r- =5 6 


Í10£ NE'T C 
= 1!03 LET 03 = 0 
2104 GGTC 2000 
3000 PRlNT 4^ _ 

IC01 PPINT 2’ _« 0 


1104 
20 

1105 r-.E >'T 

1106 G0SüB EGC 

1107 GOTO E 

4120 GCSJ5 5GG- 
4421 LET SB =BE +5 
1422 GF =f ¿i --1 

4121 GITG 4-ÍT0T 

4£00 GC-Sue 210 

43Í11 FOP M=i TG 

*E0¿ 


- c N ü " 


1 4 


3GC2 
3'00 3 

iNFü- r í 

i L - ra= _ L 

GC^G 3 100 

TMEN G0TO iE0C 
i50'ó NE/T n 

30G4 

1= E5= 

■^híEth &0T0 5 

1E 04 COTO 110 4 

3005 
: 100 

SOTO 3002 

I_£F ... s - 

.“35= 00000 

4600 305,C “00 
4É01 ?P3M _ 

:i0i 

_~T . 5 

J ■ ¿ _ 

SCIÉAlTE - 5 i ■ 

3102 

FRIri T fiT 

” r C Ih 7 Ü DE 5-. 

ifeffli: INPüT If 


.ELE “02 


m,E'- 5-5 


31S5 FOP !• = ! 

3204 [ 

31SS lE^ D0=^ 
3106 GDT.j t 
400ff FRINT R^ 
4010 ”R J ^ M~ 



^EG0 

4604 


470. 

1702 


" “ 1 5- - i 

IF Ii= - 
16GS SÜ7Ü 4é 02 
4 700 GO:JE aEO 
CLE. 

LET E 3 =0 
4733 FOP =1 T; 
4704 IF 3$ ,5: 

0 


TE' 

T ME- 


■ :tc 4Eg: 


=E £ --Elw GG - 


4 020 

?7:./r :-0 




4705 

r,E.-,T 

4021 

-E" 1- -S = IL- E = 



4 7P6 

aOfUB 500 

■íSSm 

PRINT i” 

10 0 



4707 

GGT0 F 






4720 

r-LcJS 5 00 






x 72 i 

5E=E=»; 

4022 

: t 4í = g 


C _ : T : T j 

“ 

4 722 

IF FE ■: TU 

10-4 

i= i 

? _ i ■ _ 

3- T . 

4 íc: 

4^21 

i"0£ 

x0£r 

i F ti- : 

"-6-J 

GCTQ 

1300 

4 30Q 

•3-3 ~ JF ¿f C 

4026 

1= fli= 3 

■ TE'; 

g:t: 

4300 

4601 

3lc 

-01 ■ 

*£= 4 

— i_ ¡= ■ 

3 3 T ” 

4¿00 

4 502 

kET E 6=0 

4020 

1“ RE” ” 


1-3 “C 

4430 

4S03 

fof =i t.; , 

10-2 2 

■P P$= 5 

“ -E 


4^00 

4£í>4 

IF U* r-í ¿s-tl 

40 00 

I F fl S - _ 

” - E v 

r I 

4 = 00 

£0! 

4120 

= _ ::: 





' ¡E ■ T 

410 1 

”0 F Mal “ 

7 í 



ít0Z 

305UE ™00 

4102 

íF i 

-i i 

.EM 

M 5 T — E 

4 50 7 

i ot g - 

N S7¡’ 

0 4150 




1 Sí 0 

335UB S0S 

4103 

- .5 ■ T n 




1521 

-r£T E-=eEE-z 

4 104 

C R 3rsT f-~ 

•3 C 

■'fll? 

T:G ImE 

1122 

IF Ec-12 7T| 

H 3iT = 

:.r£ 




1-324 

:i T C 4505 

4_G5 

= of ; - ■ 

S 15 



F000 

pfl I flT R- ■ 

4106 

N£XT c 




5001 

FQP r =0 , 

4107 





?0O2 

FPlfiT R~ 0 ¡ 


J0 


=:Si “HEfj 


-.ñ 


■00 


5003 

riE -T C 

50 31 

PFINT FT :: 3 

53 05 

GtfP 

5005 

C-QT- 7 

Í 0 S 0 

FFIMT R" - 2 ” . [3 

¿ 0-01 

— JLL ~ ? a 

“•004 

IMFlT Jí 

53 0 3 

£F'.'E -Rg:£-iT§ 

í-004 

GOTO ■ 

7303 

primt r- - 0 n 

-010 

F F I-.T 4 - 14 C 7i 

r! Hí= VHT*'■ ^;Wtía iv 

-31T 

IriP'jT J 

702c 

IF j»i TKEN S5-TC 

7321 

1 = .' = = _ -E h . r: 

7022 

IF J = 7 —TE 1 - GQTC 

“323 

1 = Jsl “"■í 1 . 

-024 

!• J = 5 —“'EN 3-I“‘ 

732“ 

7= .'tí _ -L . 

7325 

3* = Je" -hEi J . - 3 

-32 ” 

G-3T3 -3 1 “ 

- , 1 Ú 0 

G-3 7 J7' 200 

" i 0.. 

i .5 210 

-10 = 

I_lT i M _ “I E 

-10 3 

LE 7 " Jí m 5 - 

-¿0X 

FFTMT a- 7.0; 

71ff5 

GI5 J d 5 0 0 

7106 

GI T Li i 

-0 00 

GI5_'5 2 = 0 

7201 

^=T .s _ “3 2 

7202 

230 

72 0 j 

=3T Di - 22 “3 2 

7204 

FRINT &"'■ 1 0 

7205 

L-.:-5üÉ. 500 

7205 

;.;td e 

7300 

= 1 i 1 0 

7701 

--■F = " ' . ■ S 


FtlIJ- RT 11 3 

-333 

GCzjF 300 

7334 

: t ; 0 

7130 

=■: i je- ^5C 

7101 

l£ t .5 r " 2: =5í 

7102 

F F X M i- 1 £ 0 

?i3 3 

GG 5j5 500 

-104 

SOTÓ i 

“500 

0- G 51E- 2 5 0 

-531 

LffT D1 i H 2 2 =3í 

7502 

FF-INT i- 1: 0 

• 50 3 

GC3J5 500 

-504 

::": 3 

7 50G 

1 ::.z ¿-o 

-701 

^ - ■ -■ -S i 

' 5 02 

eCGjt 4 - i-i 0 

-50 3 

G3E.3 ÍJC 

‘7 04 

L-_ í 1 = 

--00 

■:--:.5jb 26o 

770 1 

. s "■ : _ =7 * 

7702 

FFT-..J- a- 13 0 

7-03 

.-:r_'5 500 

7704 

GOTO = 

70 33 

C Le 

¿001 

*5-0 

5002 

fqk ii 1 

5003 

EOf -. ¿ : 00 

6001 


■i 0- 3 7 - 

3= 55 12 “-3 

6006 

ME ‘T 

5007 

G 3* 3 5 5 3 0 

6 005 

" T ■ ü. 

5100 

_ 5 -00 

3 135 

GOT; fOOr 

2000 

¿FUE ■PPGI£NT£S 

£001 

GOTO 5 




7 100 
"230 

?see 

“40C 

~f 00 
7700 


iS* 


-?E 


DE C 


100 



o 

ü 

£ 

I I 

jS 
1 í 

II 
Z a 


TODO LO QUE 
PUEDE HACERSE 
EN LA ESCUELA: 
EN EL COMERCIO. 
EN LOS JUEGOS. 

Dispon emú* de-: QISHETEHAS 
DATASETE - LMPREKÜRAí 
ERABA DORE S - B ÍBL10( >K A F i A 
niSKETES - ÍNTEBÍ’ACES 
ACCESORIOS 


LOGO 




m 


Un lenguaje para 
aprender con manuaJ'y 
t cHikettei, uno de 
lenguaje y otro de 
demostración y 
aplicaciones 


Envíos al Interior 

Con garantía eterna por 

pr?an S_A 


EDITADO EN CASTELLANO 


Asesora miento y 
demostración 
« escuelas e Instituios. 

Disponemos zonas de 
distribución, 

Ayente aiultjrlcrfdü de Orean iA. 

SANWA S.A 

Av. Corrientes 21ÍS - Cap. 
TcL 46-2529/737 7 
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SANDWICH 


FELIZ DIA 




COMP.: CZ 1000/1500 
TK 03/85 
CONF.;2K 

CLAS.: ENTRETENIMIENTO 



COMP.: CZ 1000/1500 
TK 83/85 
CQNF.; £ K 

CLAS.: ENTRETENIMIENTO 



El asterisco [*) representa u na mos¬ 
ca que quiere robarse el jamón de 
un sandwich; antes que alguien 
junte los 2 panes hay que encon¬ 
trar un agujero para escapar. 



Pantalla 



Con este programa se puede sa¬ 
ber en qué día de la semana cayó 
una cierta fecha, con sólo entrar 
día, mes y año. 




COME 

MONSTRUOS 



Aquí tenemos un come monstruos 
en la parte inferior de la pantalla. 
Los monstruos aparecerán en cual¬ 
quier lugar, en su paseo cotidiano, 
y ios podremos comer pulsando la 
tecla “p", Pero si tratamos de co¬ 
mer alguno que se encuentre de¬ 
trás del campo úe fuerza, se esca¬ 
parán todos y terminará eF juego. 
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Gran Concurso 

FIN DE AÑO 

Para usuarios de Microcomputadores. 
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CARGANDO 



Ya a esta altura de nuestro cono¬ 
cimiento todos sabemos (o debe¬ 
ría m o s sa be r) q ué es y en q ué con¬ 
siste un programa en código de 
máquina o Assembler Para los 
desmemoriados va ei siguiente 
“refresh”: Una rutina en C.M. o 
Assembler es una serie de instruc¬ 
ciones dadas bajo un cierto códi¬ 
go que el microprocesadorZ-80 A 
puede ejecutar directamente, es¬ 
to es sin necesidad de consultar 
la memoria ROM; encargada de 
traducir las sentencias que vie¬ 
nen dadas en BASIC. 

También sonconocidaslas venta¬ 
jas que trae un programa en C.M., 
es decir, velocidad de ejecución 
y mayor flexibilidad de programa¬ 
ción dado que podemos hacer co¬ 
sas que son imposibles de realizar 
con el BASIC. Pero también'exis¬ 
ten desventajas, es más compli¬ 
cado de entender, engorroso de 
ensamblar y bastante más largo 
de teclear, dado que el C.M- es un 
lenguaje de bajo nivel. Muchas ve¬ 
ces nos encontramos con lista¬ 
dos que tienen una parte en C.M, 
y para poder introducirlo es nece¬ 
sario seguir ciertos pasos: 

Primer Paso: 

Un espacio en la memoria 

Generar el espacio físico en memo¬ 
ria donde se almacenará ei código 
máquina. Para entender esta pri¬ 
mer etapa imaginemos lo siguien¬ 
te: supongamos que queremos to¬ 
ma r u n a taza d e caf é pe ro d ispone- 
mos de una taza maciza, es decir 
sin cavidad alguna. Primero ten¬ 
dremos que fabricar un espacio en 
la taza para poder vertir el café, y 
recién entonces dedicarnos a sa¬ 


borearlo. Lo mismo ocurre con la 
memoria dei computador Debe¬ 
mos primero fabricar un espacio 
en la memoria para que luego poda¬ 
mos “servir' 1 el código de máquina. 
Exactamente eso es lo que hace¬ 
mos al colocar líneas REM ai co¬ 
mienzo con tantos caracteres co¬ 
como códigos'tengamos que intro¬ 
ducir 

Resumiendo: para fabricar el espa¬ 
cio necesario en memoria, debe¬ 
mos colocar líneas REM seguidas 
de tantos caracteres como códi¬ 
gos tengamos. Los caracteres que 
coloquemos, no tienen importan¬ 
cia (pueden ser números, letras, 
etc), dado que sólo están para 
hacer lugar. 

Pero aquí viene la primera compli¬ 
cación: 

Si tenemos por ejemplo, 342 códi¬ 
gos ¿cómo hacemos 1 sola línea 


REM con 342 caracteres si a nues¬ 
tra máquinasólo le podemos ingre¬ 
sar 150 caracteres por línea? 

Muy simple: mintiéndole a la rom. 
Así es, existen dos direcciones den¬ 
tro de Ea memoria ROM que llevan 
fa cuenta de la longitud de la pri¬ 
mera línea, si alteramos esos valo¬ 
res, podremos tener más de una 
línea REM sin que la máquina se 
dé cuenta. Esas direcciones son: 
16511 y 16512. Volvamos a nues¬ 
tro ejemplo en r donde debíamos 
ingresar 342 códigos. Ya sabemos 
que no podemos generar una sola 
fínea REM con ese número de 
caracteres, pero si aplicamos nues¬ 
tra “mentira", Jo podremos hacer 
de la siguiente forma: 

1 ) Entrar la línea 1 REM con 114 
caracteres es decir: 1 

1 REM 1234567890 1234567890 
1234567890... 

2) .-Hacer PRINT PEEK 16511, el 
resultado debe ser 116 (dos unida¬ 
des má s que el n úm e ro d e ca ract e- 
res entrados en la línea REM). Si no 
es así, entonces hay un error. 3).- 
Editar la línea. 

1 ) cambiarle el número dos veces, 
De este modo obtenemos tres lí¬ 
neas REM con los números 1,2,y 3 
cada una con 114 caracteres. 4)- 
Entrar directamente (sin número 
de línea) los siguientes POKES: 


Tabla 

POKE 16511 

POKE 16512 

N° de códigos a entrar 

1 

0 

1 

10 

0 

10 

255 

0 

255 

1 

1 

256 

10 

1 

266 

255 

1 

511 

100 

100 

25700 

255 

255 

65535 
















































































































































Con esta nota esperamos dar solución a los muchos 
problemas que se presentan llegado el momento 
de entrar una rutina o programa en Código de 

Máquina en el ZX-8J. 


! 


POKE 16511,88 POKE 16512,1 
cuyo efecto es hacer creer al ZX- 
81 que en vez de tener 3 líneas 
REM con 114 caracteres, tiene 
una sola con 342 caracteres en 
total. 

En general, la cuenta es la siguien¬ 
te: si definimos con “a JI el número 
que va en ja dirección 1651 1 (en 
nuestro ejemplo 88) ,y por IJ b n el 
que va en la dirección 16512 (1 en 
el ejemplo), entonces cualquiera 
sea la cantidad de códigos que 
debamos introducir, deberá cum* 
pfirse que: 

(a+ 256 "b) debe ser mayor o igual 
que el número total de códigos a 
cargar. 

En nuestro ejemplo: teníamos 342 
cód igos, y por ot ro I ad o a = 68 y b = 

1 entonces 88 + 256 *' 1 — 344; La 
condición se cumple por lo tanto, 
nuestro engaño resultará exitoso. 
Tener siempre presente que los 
límites de "a” y J ‘b" son 255 y en 
todos los casos ya que un número 
mayor dará un error de número 
fuera de rango. 

Aquí va u na tabla con algunos valo* 
res ejemplo para clarificar mas el 
concepto. 

Resumiedo : podemos generar la 
cantidad de líneas REM que sean 
necesarias con la cantidad de ca¬ 
racteres necesarios para luego cal¬ 
cular nuestra "trampa" y así facili¬ 
tamos la tarea. 

Otra forma de generar el REM 
inicial está dado por le programa 
generador de REM publicado en 
K-64 número 3, en el programa 
simulador de vuelo. 

Una vez fabricado el espacio físico 
en memoria, podremos proceder a 
la carga propiamente dicha del 
G.M, 

Pero aquí tenemos que apuntar 
una nueva distinción, estos códi¬ 
gos pueden estar dados en núme¬ 
ros decimales (base 10) o bien en 
números hexadecimales (base 16). 
Para cada uno de los casos debe¬ 
mos disponer un segundo progra¬ 
ma, llamado programa cargador, 
que nos ayudará a introducir estos 
códigos en ¡a máquina. 


Segundo Paso: 

Teclear el programa 

Debemos teclear el programa can 
g ador q ue co rre s pon da, seg ú n q u é 
tipo de códigos tengamos (hexa- 
decimal o decimal), A continuación 
están los dos programas cargado¬ 
res, uno para cada caso. 

PROGRAMA CARGADOR DE CO¬ 
DIGOS H EX AD ECIM AL ES 

1 REM 12345678901234567890.., 

(tantos caracteres como códigos 

hexadeci males tenga el programa) 

10 LETX= 16514 

20 LET AS - 16514 

30 |F A$ = 16514 THEN I N PUT AS 

40 IF AS = "S” THEN STOP 

50 POKE X 16*CODE A$ + CODE 

AS (2) -476 

60 LET X = X + 1 

70 LET AS = AS (TO) 

80 GOTO 30 

La línea 10 especifica la dirección 
de comienzo del G.M. en este caso 
16514. Las íneas 20,30 y 40 verifi¬ 
can si se ha pulsado la teclas El S” 
en cuyo caso se detienen la carga, 
obviamente, cuando terminarnos 
de cargar pulsamos Jt S'’, si no se 
pulsó ninguna tecla,continúacon la 
carga. La línea 50 convierte el nú¬ 
mero hexa entrado a numero deci¬ 
mal y lo '■POKEA 1 ’ en la dirección x. 

La línea 60 i ncrementa la dirección 
de carga en 1 unidad. Finalmente 
la línea 80 reinicializa un nuevo 
ciclo jde carga. 

PROGRAMA CARGADOR DE CO¬ 
DIGOS DECIMALES 

10 LET X — 16514 
20 1NPUT A 

30 1F A = -1 THEN STOP 
40 POKE X, A 
50 LET X = X + 1 
60 GOTO 20 

Aquí la cosa es más sencilla, el 
programa es semejante al anterior 
sólo que se detendrá cuando en¬ 
tremos un -1. 

Otro método para generar los pro¬ 
gramas cargadores,, es por medio 
de bucles FOR/NEXT. Así por ejem¬ 


plo, si tenemos 500 códigos para 
entrar, el programa cargador de 
Hexa quedará: 

10 FOR X = 16514 TO 17014 
20 liNPUT A$ 

30 IF A$ - L, S” THEN STOP 
40 POKE X, 16 * CO DE AS + CODE 
AS (2) -476 

50 LET A$ - AS (3 TO) 

60 NEXT X 

Y el p rog ra maca rgador d e cód i gos 
decimales quedará: 

10 FOR X = 16514 TO 17014 
20 INPUT A 

30 ÉA A = -1 THEN STOP 
40 POKE X, a 
50 NEXT X 

A estos programas podemos agre¬ 
garles líneas accesorias para, por 
ejemplo visualizar el número que 
está siendo "pokeado M en pantalla, 
etc. 

Tercer Paso: 

Entremos todos los códigos 

Finalmente luego de teclear el pro¬ 
grama cargador correspondiente, 
podemos dedicarnos de lleno a 
entrar uno a uno todos los códigos 
de nuestra rutina de C.M. 

Casr con seguridad, todos los pro¬ 
gramas en G.M. tendrán algo de 
BASIC, luego de cargar los códi¬ 
gos, teclearemos la parte de BA¬ 
SIC de nuestro programa, sin preo¬ 
cuparnos de que estas líneas se 
superpongan con las del programa 
cargador, ya que una vez cargado 
el C.M. este programa cargador no 
sirve más para nada, 

Nota importante: jamás, nunca su¬ 
perponer una línea BASIC a cual¬ 
quiera de las líneas REM de co¬ 
mienzo puesto que ellas ahora con¬ 
tienen el C.M. y cualquier eventual 
borrado de alguna de ellas signifi¬ 
cará el crash irreversible, lo que 
nos significará comenzar todo de 
nuevo, desde cero. 

En próximos números seguiremos 
a bo rd ando est os te mas para ad e n- 
tramos cada vez más en el mundo 
dei C.M. 

HUGO BUS SO 











































U n poco por ese afá n déd escu b ri r alg o d ife rente, algo 
nuevo, pero también mucho por esa curiosidad de 
conocer en persona corno son esos "genios 51 que 
hacen maravillas con estas m aquí n i tas. Las pregun¬ 
tas se sucedían sin cesar durante el viaje: "¿Trabaja¬ 
rán realmente con máquinas comunes o con mons¬ 
truos equipados de emuladores?"; “¿Serán bichos 
raros de mal genio que guardan celosamente sus se- 
cretos?"; "Trabajan incansablemente noches y días 
sin parar?' 1 ; y así una tras otra. 

También preocupaba la idea de cómo habían pasado 
I os p ri me ros años de esta “te rce ra ola” que rec i é n nos 
llega tímidamente a nosotros. La respuesta fue muy 
simple, sencillamente consumiendo primero lo que 
venía "cocinado" desde fábrica, hasta que poco a 
poco se fueron animando personas cualesquiera, 
muchos autodidactas, que con mucho esfuerzo “men¬ 
ta r y u n poc o de d i ñero c rearo n su propia empresa de 
hardware o de software. Claro que corrieron con fa 
gran ventaja de esteren países muy receptivos a toda 
esta novedad y, muy importante, con mayor poder ad¬ 
quisitivo, Cosa curiosa, a pesar de que los sueldos 
promedio al i í son varias veces más altos, los ordena¬ 
dores personales cuestan varias veces menos que 


aquí! Consecuencia: todo el mundo o casi, tiene uno! 
Todos reconocen que Inglaterra es quien va a la ca¬ 
beza en novedades y calidad de productos, y cada 
uno de los demás países europeos le siguen muy de 
cerca comprándole sus computadoras pero produ¬ 
ciendo mucho software local y periféricos, Es que 
además resulta lógico, a nadie se le ocurre construir 
una computadora que intente ser competencia por 
ejemplo de la Commodore o de la Spectrum! 

También se han tomado muyen serio la educación en 
Francia, se asegura que sólo en establecimientos 
educativos, hay 150QQ0 Spectrums, y esperan que 
esto aumente en toda Europa debido a la aparición 
reciente del LOGO oficial de Sinclair para esa com¬ 
putadora. 

Pero se nota una sensación extraña en el ambiente. 
Parece como si todos estuvieran esperando que algo 
suceda. Algo como el gran salto que hubo con la apa¬ 
rición de la Spectrum desde ta ZX81. Y todos ven 
cómo van pasando los meses sin que nada ocurra, Y 
es a sí q ue m áq ui ñas como la O L o las MSX n o h an t e- 
nido e! boom que se esperaba. Realmente entienden 
que la diferencia entre estas máquinas y las que ya 
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ESTUVIMOS EN LA 
CUNA DEL SOFT Y DEL HARI 























En el afán de extender el horizonte y estar a la vanguardia y al día con la 
información para nuestros lectores, es que en un gran esfuerzo, nos fuimos 
hasta la cuna del soft y del hará que hace eco en nuestro continente. 


to dos p osee n no es tan g ran de, y si a esto le s u mamos 
todo el soft y los archivos que uno fue juntando en 
estos últimos años, el cambio no compensa. 

En España en cambio, las MSX están teniendo un éxi¬ 
to relativamente bueno y la GL. ha repuntado ahora 
que se of rec e con u n siste ma ope rativo co n m ensajes 
en castellano, como así también el paquete de soft 
que se ofrece con ella. Un detalle, esta nueva GL 
española tiene' 1 

Otro hecho notable es la proliferación reciente en 
España de empresas que realizan toda suerte de 
periféricos para la Spectmm. Algunos son simple¬ 
mente semejantes a los ya hechos en Inglaterra, pero 
hemos visto novedades interesantes, que por suer¬ 
te según sabemos, pronto llegarán a la Argentina. 

Y es así que quisimos verlos de cerca, como piensan, 
trabajan y progresan, esta gente que tan lejos de 
nosotros están tan cerca con la misma pasión en co¬ 
mún; la computación para todos. 

Y como también se pensó en tratar más con quienes 
mejor nos entendemos y compartimos una misma 
lengua, es que nos detuvimos en España. 

La sorpresa fue al conocerlos. Y comenzamos esta 
serie de notas con la gente de PIN SOFT. 

Ubicados en un piso de una de las avenidas más 
bellas de Barcelona, este grupo de spectrumnóma¬ 
nos, trabajan hasta en pleno Agosto {que es pleno ve¬ 
rano). 

Ya al presentarnos me entero de quienes andaban 
por ahí. Nada menos que dos nombres ya conocidos 
entre nosotros; Joan SALES RGIG y Oscar DOMIN¬ 
GO. Nombres estos q ue seg ura m e nte h e mos vis toen 
algún libro sobre lenguaje de máquina para la ZX81 ó 
en el copyright de programas para Spectrumcomo el 
"Context 64"; un potente procesador de textos adap¬ 
tado al castellano; ‘"Control de Stocks 64 11 ; un control 
de stock de 64 caracteres por Jínea; o el nuevo “SI TI” 
una base de datos que permite búsqueda por fechas 
o real izar cálculos complejos entre campos. Anterior¬ 
mente ellos trabajaban nada menos que para la gente 
de Ventamatic, pioneros en España desde la apari¬ 
ción de la famosa ZX81. 

La tarjeta de presentación fue, por supuesto, un par 
de los últimos números de K64. Cuál fue mi sorpresa 
al ver como enseguida se pusieron a hojearlas. Evi¬ 
dentemente a todos los que nos caracteriza esta pa¬ 
sión, tenemos las mismas costumbres! 

Enseguida, con un calor que agobiaba, y una lata fres¬ 
ca de coca de por medio, comenzamos a intercam¬ 
biar opiniones, 

Los temas obligados fueron por supuesto, don Olive 
Sinclair y Jack TraimeLY nos pusieron al tanto de las 
últimas anécdotas. Como de cuando Don Olive se 
tomó a las trompadas en un pub inglés con su más 
directo rival de la Acorn; de sus andanzas con el 
nuevo auto eléctrico CS que diseñado para andar en 


Londres no tiene techo. O que recientemente al 
borde de la quiebra por una deuda de 15 millones de 
libras tuvo que quedarse solo con el £0% de sus ac¬ 
ciones y cederle el sillón de director a Mr. Maxwell, 
director det importante grupo editorial TVHrrori'. 

En Espa ñ a, af ir ma J oa n S A LES, ya se ha 11 eg ado aúna 
especie de saturación, Y esto debido también a que 
los f ab ric antes pa rec e n no te ner ya nada más espec- 
tac u la r q ue ofrecer. Todos se limita n a em ba rea rse en 
una guerra de bajar ios precios para aumentar las 
ve ntas de u n ordenad o r que ya h ace más de t res a ñ os 
que está en la calle, cuando sus últimos modelos no 
tienen la aceptación esperada en un principio. El QL 
po r ejem pío, se p rome t i ó t anto y se de moró tanto que 
cuando apareció, sucedió una desilusión, Los japo¬ 
neses por su parte, para repuntar y competir con sus 
MSX parece que están por lanzar el MSX de 16 bit. 
Volviendo a España, opinan que el tema está en que 
como ya quien más y quien menos tiene un ordenador 
doméstico, el negocio está en la producción iocal de 
buen software en castellano, tanto de juegos como 
educativo, y de periféricos de bajo costo que estén al 
alcance de todos los bolsillos. Pero específicamente 
en el caso de periféricos, seguir con la filosofía de 
Sinclair: “Algo muy novedoso, pequeño, fácil de usar y 
muy barato". 

Córno se hace un programa "best seller", es algo que 
no tiene ningún secreto o tiene muchos según como 
se lo mire. Pero como reglas generales, todo pasa por 
palpar primero qué es (o que el público espera de u n 
buen juego o de un buen programa educativo, luego 
darle una primera forma en bloques ya partir de ahí 
todo va en ef buen “savoir taire" del programador. 
Claro que disponer de buenas herramientas es indis¬ 
pensable, como de un assembler para el lenguaje de 
máquina, o un tapiz óptico para los dibujos, o de una 
IBM PC con emulador de Spectrum... 

También es importante lo que se aprende de los pro¬ 
grama s ya h echos po r ot ros “g e n ios", siem pre se de s- 
cubren nuevos trucos. 

En esos momentos Joan Sales tenía entre manos la 
programación de un nuevo titulo del tipo "espaciar, 
con personajes de rápido movimiento. 

Entre otros proyectos tienen una novedad, la pro¬ 
ducción de programas de juegos con pistola óptica y 
el proyecto de un digitalizador de imágenes fotográ¬ 
ficas por un método revolucionariamente sencillo. 
Una de las preocupaciones de todo programador es 
la proliferación de la piratería de software, Sin embar¬ 
go en España no es tan grave como en nuestro país 
debido a que existe ya una gran variedad de títulos 
“oficiales" a la venta y con una buena promoción. 
Para terminar, insistieron en mandar un gran abrazo 
para todos los lectores de K64 f con la promesa y el 
deseo de estar pronto en nuestras páginas con algún 
artículo interesante (Sobre todo Oscar Domingo, 
quien nos confesó que su padre es argentino!}. 
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aciendo un raccanto de lo 


íes. 


expuesío en el artículo an* 
tenor, podemos rescatar al¬ 
gunos conceptos importan- 


En primer fugar, recordemos cómo 
se compone internamente un com¬ 
putador: El C P U, cumple funcio¬ 
nes de órgano pensante, el U.LA 
de administrador de los canales de 
entrada y salida de información 
desde y hacia periféricos y final¬ 
mente la memoria. Existen dos ti¬ 
pos de memoria, ROM (de sólo lec¬ 
tura), cumple funciones de "dic¬ 
cionario 1 ’ entre él BASIC y el có¬ 
digo máquina: por último, la me¬ 
moria RAM, en donde se almace¬ 
nan los programas, datos, varia¬ 
bles, etc. 

En segundo lugar, conocimos el 
uso de las sentencias PEEK y PO- 
KE d cuyas funciones son la de ob¬ 
servar el contenido de una direc¬ 
ción particular de memoria (PEEK) 
e ingresar un dato cualquiera en 
una posición de memoria deter¬ 
minada (POKE), 

También relacionamos los núme¬ 
ros decimales, binarios y hexade- 
cimales, asociándolos con el con¬ 
cepto de apalabra" definiendo bit y 
byte. 


Memoria, cuánta y cómo 

Como dijimos, nuestra ZX-31 es un 
computador de ocho bits, lo que 
significará que la extensión de sus 
palabras serán de ocho dígitos bi¬ 
narios. La cifra más alta que se pue- 
de formar con ocho bits es 11111111 
ó FF H. 

El rango de memoria más usual 
entre ias computadoras hogareñas 
se extiende generalmente en los 
16 Kbytes y los 64 Kbytes, es decir 
que se dispone de una capacidad 
de almacenamiento de 16384 by- 
tes para las primeras y de 65535 
bytes para las últimas. 


Esto significa que el C P U. debe 
ser capaz de “ver” en todas y cada 
una de esas direcciones puesto 
que es allí donde se hallan los da¬ 
tos que deberá procesar. La teoría 
nos indica que un byte representa 
ai número decimal 255, hecho por 
el cual podemos deducir que con 
un solo byte de ocho bits tendría¬ 
mos acceso a 255 posiciones de 



memoria de las 65535 disponibles 
para 64 K, 

Este hecho nos lleva a instrumen¬ 
tar algún procedimiento que nos 
permite manejar la totalidad de di¬ 
recciones de memoria. Esto se con¬ 
sigue disponiendo de pares de by¬ 
tes. En otras palabras, utilizar dos 
bytes que estén siempre juntos, 
pero, uno por encima del otro, es 
decir, que el primer byte se encar¬ 
gue de registrar 255 posiciones y 
el otro empezará a contar recién en 
el momento en que el primero ha¬ 
ya agotado su capacidad. Por esto 
el segundo byte arrancará contan¬ 
do desde 256, porque las primeras 
255 posiciones ya las contó el pri¬ 
mer byte. 

Ahora podemos llegar a cualquier 
dirección de memoria, con sólo 
“preguntar” cuánto vale el primer 
byte, y sumarle este número al se¬ 
gundo, teniendo en cuenta que el 
segundo comienza a contar desde 
256, 

Al primer byte se lo llama más sig¬ 
nificativo o alto y al segundo me¬ 
nos significativo o bajo. 

Podemos ilustrar con el siguiente 
ejemplo: 

En el artículo anterior, probando el 


comando PEEK, tecleamos lo 
guiente: 

PRINT PEEK 16396 + 256 * PEÍ 
16397 

El resultado nos daba cuanta 
teníamos ocupada con program 
Ahora podemos entender qué es 
que en realidad hacíamos ente 
oes. Hay una zona de memoria 
tinada a almacenar las variabl 
del propio sistema BASIC, cor 
podemos encontrar en el manu 
Las dos direcciones en cuesti 
son las que guardan en el sister 
de variables ia dirección que oc 
pa el último byte de un prograr 
cualquiera que tengamos en ir 
moría. La dirección 16396 cc 
tiene el byte más significativo ■ 
esa dirección y la 16397 eí men 
significativo. 

Aclaremos con un ejemplo nurr 
rico: 

Supongamos que el byte más s 
nificatrvo que se halla almacena 1 
en Ja posición 16396 sea 255 y 
menos significativo, almacena* 
en 16397 sea 5. Hacemos PEf 
16396 y obtendremos 255, hac 
mos PEEK 16397 y obtendrem 
5 . Pero como 5 es el byte más ai- 
debemos multiplicarlo por 256 ,i 


























En esta segunda entrega, continuaremos 
ampliando nuestros conocimientos 
sobre lo que no nos es posible ver desde el teclado. 


( 



nuestro resultado es: 

PEEK 16396 + 256 * PEEK 16397 
— 265 + 256 *6 = 1535 
Significa que, el programa que te¬ 
nemos almacenado en memoria 
tiene 1535 bytes de longuitad. 

En otro caso, si los pares de bytes 
contienen ambos 265, resultará: 
255 + 256 * 255 = 65535, Queco- 
rrespondea una memoria de 65535 
bytes. 

Los números de linea de programa 
son almacenados en 2 bytes, esto 
nos sugiere que podemos entrar 
65535 líneas de programa, sin em¬ 
bargo, el BASIC usado en el ZX-81 
acepta sólo 9999 como última lí¬ 
nea de-programa. 

Los dos bytes que cuentan el nú¬ 
mero de línea se almacenan en las 
direcciones 16509 y 1651<X Si el 
número de línea es menor que 255 
se almacena ese numero en 16509 
y un cero en 16510. 

Si en cambio el número de línea de 
programa supera 255, por ejemplo 
256, ser almacenará un O en 16509 
y un 1 en 1 651 0 r dado que 0 + 256 
* 1 ^ 256, 

Finalmente si el número de línea es 
515 el byte más bajo contendrá un 
3 y el más alto un 2, de esta mane- 
ra obtenemos nuestro número de 
línea: 

3 + 256 * 2 — 515 

Almacenando datos 

A travé s de este p rooed i m i e n to po¬ 
demos almacenar cualquier cifra 
positiva en memoria, pero de una 
n ue va ma ne ra. To memos po r ej am¬ 
pio, un número cualquiera que lía- 
mar e mos v — 1 2 45, Podemos g ua r- 


dar este número en memoria bajo 
la forma de dos bytes, uno alto y 
otro bajo. 

Utilizaremos dos direcciones cual¬ 
quiera M n 1d y"n 4-1 "que estén libres 
en RAM, p.ej. 17000 y 17001, 

La siguiente fórmula nos da las 
cantidades correctas a ser alma¬ 
cenadas por ambos bytes: 

POKE n,v- 256 * ÍNT (v/256) 
POKE (n+1), INT (v/256) 
Reemplazando con nuestros va¬ 
lores: 

POKE 17000,221 
POKE 17001,4 

De esta forma queda el número 
1245 almacenado bajo la forma de 
dos bytes en tas direcciones 17000 
y 17001, 

Para recuperar nuestro número ori¬ 
ginal, hacemos: 

PEEK n + 256 * PEEK (n + 1) 
reemplazando: 

PEEK 17000 + 256 * PEEK 17001 
que nos da el siguiente resultado: 
PEEK 17000 = 221 
PEEK 17001 = 4 
221 + 256*4 = 1245 

La parte engorrosa de este proce¬ 
dimiento es, obviamente, la par¬ 
tición del número original en las 
dos cifras que compondrán cada 
uno de los dos bytes. Existe, sin 
embargo, un método más fácil y es 
utilizando una de Jas variables del 
sistema. Esta variable es la llamada 
SEED, que da origen a los números 
RANO, 

SEE D se encuentra en Jas posicio¬ 
nes 16434 y 16435 de la zona de 
variables. Recordemos nuestro nú¬ 


mero ejemplo: 1245, 

Haciendo RAND 1245, automáti¬ 
camente el computador descom¬ 
pondrá nuestro número en dos by¬ 
tes y los alojará en las direcciones 
de la variable, es decir, 16434 y 
16435. Si ahora queremos almace¬ 
nar el contenido de esas posicio¬ 
nes en las direcciones de RAM 
17000 y 1 7001 , sólo tenemos que 

POKE 17000, PEEK (16434) 
POKE 17001, PEEK (16435) 

Este paso colocará el contenido de 
la posición 16434 en la dirección 
17000 y el contenido de 16435 en 
17001. Consiguiendo nuestro ob¬ 
jetivo de otra manera distinta. 
Para recuperar nuestro número 
nuevamente, haremos como de 
costumbre: 

PEEK 17000 + 256 * PEEK 17001 

Una de Jas ventajas de estos méto¬ 
dos, algo engorrosos a primera vis¬ 
ta, es que af número que recupera¬ 
mos lo podemos manejar como 
una variable más, podemos sumar¬ 
le otro, multiplicarlo, utilizarlo como 
coordenada de PR I NTo PLOT, etc,, 
y I uego vol ve r a g u arda rio de la m i$- 
ma manera. Resumiendo, podemos 
hacer un extenso tratamiento de 
cifras con un número mínimo de va¬ 
riables de asignación desde BA¬ 
SIC. 

Gomo siempre, la mejor forma de 
aprender estos temas es con un 
empujón de teoría y muchas prue¬ 
bas sobre eJ teclado. 

Hasta la próxima. 

HUGO BUSSÜ 
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Este periférico se utiliza para al¬ 
macenar información enferma per¬ 
manente al igual que en un graba¬ 
dor de cassette, pero con una gran 
ventaja: ef tiempo que tarda en 
guardarse y en sacarse la infor¬ 
mación es cien veces más rápido. 
En este caso, a diferencia de un 
cassette, el lugar donde se guar¬ 
dan los datos es un disco, no un 
long pfay, un disco de plástico fle¬ 
xible, recubierto de material ferro- 
mag nét ic o r Este d isco está proteg i- 
do de polvo y rayones. Por una 
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funda de forma cuadrada y color 
negro. Vienen de dos tamaños: 
5 1 /4 y S pulgadas. En realidad en 
estos momentos se están usando 
también otros tipos de discos de 3, 
3 1/2 pulgadas, con característi¬ 
cas mejores, pero donde el princi¬ 
pio de funcionamiento es exacta¬ 
mente el mismo; por lo tanto para, 
esta explicación nos vamos a limi¬ 
tar a los discos tradicionales, tam¬ 
bién llamados diskettes o floppy 
disk. 

Aunque el principio físico que per¬ 
mite almacenar los datos en el dis- 
kette es el mismo que en el casse¬ 
tte, la gran diferencia radica en la 
forma en que se accede a ellos. En 
el cassette el acceso es secuencia!» 
o sea r se graba un dato después de 
otro a lo Sargo de la cinta y para 
leerlo hay que empezar siempre 
desde el primero. Así si, por ejem¬ 
plo, grabamos una lista de nombres 
con su dirección en orden alfabé¬ 
tico en un archivo llamado DIREC, 
para obtener la dirección de una 
persona cuyo nombre empiezacon 
C debemos buscar en el cassette 
el archivo DIREC y luego comen¬ 
zar a leer nombre por nombre has¬ 
ta encontrar los que empiezan con 
C y así específ icamente el nombre 
que queríamos. 

En un. diskette el acceso es direc¬ 
to , cu ando !e m and o a g ra ba r u n da - 
to en el archivo DIREC el sistema 
automáticamente lo ubica al final 
del archivo, sin pasar por los datos 
anteriores y para leerlo también lo 
hace directamente. Esto permite 
ganar mucho tiempo, sobre todo 


Figura 2r Organización de pistas y sectores en un diskette 
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en ei manejo de archivos de infor¬ 
mación, no tanto en ios archivos de 
programas donde los datos siem¬ 
pre son leídos secuencia!mente pa¬ 
ra ser almacenados en la memoria 
RAM. En otras palabras, los casse¬ 
ttes son ideales para guardar pro¬ 
gramas pero son muy lentos para 
manejar información general. 
Veamos cómo se organizan los 
datos dentro del diskette. 

Como se ve en la figura, en pistas 
concéntricas llamadas TRACKS, 
Cada uno de estos tracks está di¬ 
vidido a su vez en sectores (secto¬ 
res circulares) y cada sector tiene 
256 bytes (en este caso). A su vez 
cada sector empieza con un TRACK/ 
SECTOR ID que es la IDENTIFICA¬ 
CION de qué sector y de qué track 
es el sector que sigue; en la am¬ 
pliación se resalta el ID del track 1, 
sector 8. 

De esta forma toda la información 
está ordenada en el disco por sec¬ 
tor y track. 

En el próximo nu mero aclararemos 
en detalle cómo se lee y se graba 
en un diskette. 

Faltaría aclarar cuál es la capa¬ 
cidad total de! diskette. En este 
caso hay 10 sectores por track y 36 
tracks por disco, por lo tanto hay 
360 sectores. 

En este disco caben 360 x 256 
bytes, o sea 92160 bytes, o lo que 
es lo mismo 90 kbytes (92160 -** 
1024). En disco de doble densidad 
en cada sector entran 512 bytes, 
por lo tanto tienen 180 kbytes de 
capacidad. Por último si los diske¬ 
ttes son doble faz y doble densidad, 
esta información entra en cada ca¬ 
ra,, siendo su capacidad total de 
360 kbytes. 

El término doble densidad signi¬ 
fica que, en la misma superficie (un 
sector) se puede grabar el doble de 
información (512 bytes en vez de 
256 bytes). Esta característica es 
parte de las especificaciones del 
diskette 

Los diskettes de doble densidad 
pueden ser grabados en un equipo 
simple densidad sin problemas; lo 
contrario no es cor recto. A pesar de 
que sí puede ser grabado un disco 
simple densidad en un equipo do¬ 
ble densidad, muchas veces sur¬ 
gen problemas de pérdida de infor¬ 
mación, por lo que se recomienda 
no hacerlo, 

Con esta recomendación nos des¬ 
pedimos hasta la próxima. 

INGENIERO NINO MORENO 
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Arvoc, representante en nuestro 
país de la empresa Microdigítai de 
Brasil, lanzó en mayo de este año 
su nuevo modelo de computador 
color denominado TK-90X, Este 
nuevo equipo es un miembro más 
de la familia de microcomputado¬ 
res que la firma comercializa en 
nuestro país 1 que se compone de 
los modelos TK-83, TK-85 (ambos 
blanco y negro),TK-9GX y TK-2000, 
siendo este último el '“top of the 
line' 1 de Microdigital Arvoc en Ar¬ 
gentina, 

Con la inserción del TK-90X se 
ofrece una muy completa línea de 
micros que cubren necesidades 
que van desde el aprendizaje (pri¬ 
mer paso en computación), hasta la 
gestión de pequeñas empresas. 

Cuestión de Compatibilidad 

El TK-90X trabaja en BASIC e in¬ 
corpora el microprocesador Z-80A 
a 3.58 MHz* Q colores, 16 ó 48 
Kbytes de memoria RAM y 16 K de 
ROM, 

Con respecto ai sistema operativo 


y al BASIC, estos hacen al TK-90X 
totalmente compatible con el Sin¬ 
clair Spectrum: ^se trató de hacer 
una máquina que funcione lo más 
parecido posible a! Sinclair, pero 
incorporándole mejoras a fin de 
cubrirlos puntos flojos de aquélla 11 , 
nos apuntaba el Ing, Kadener, Así 
es, con respecto a la compatibili¬ 
dad, ei modelo comercializado en 
nuestro país lleva la denominación 
de TK-90XA y su co-nformación es 
exclusiva para Argentina. En Brasil 
el modelo lleva la denominación de 
TK-9GXB y es algo diferente, tanto 
en ROM como en la estructura in¬ 
terna del U.IA, 

En lo que se refiere a las mejoras 
introducidas con respecto al mo¬ 
delo de Sinclair, el TK-90X dispone 
de salida de audío por el T V,, inter¬ 
fase para joystick incorporada,fun¬ 
ción TRACE, mensajes en caste¬ 
llano y una opción muy interesante, 
permite la utilización de acentos, 
letra ñ, etc., bajo el nombre de UDG. 
Con respecto a esto último, ei TK- 
90X es el primer computador de 


este tipo que posee todas las ca¬ 
racterísticas para edición de tex¬ 
tos tanto en castellano como en 
portugués ya que incorpora todas 
las letras y símbolos propios de es¬ 
tos dos idiomas. 

Las nuevas funciones apuntadas 
residen en una ROM fabricada ex¬ 
clusivamente para Microdigital 

C ircuite ría Compatible 

Con respecto a este tema el Ing. 
Kadener nos dijo: "el port trasero 
es idéntico al de i Spectrum, lo que 
permite la conexión de cualquier 
interfase o periférico de u no a otro, 
en f o rma t ota imente t ra ns pa rente 11 . 
Esto nos parece un punto impor¬ 
tante ya que como todos los usua¬ 
rios sabemos, es tranquilizador 
pensar que el equipo que tenemos 
en casa no depende únicamente 
de una sola marca para su expan¬ 
sión. 

“En [o que hace a interfases, las 
previstas por Microdigital son las 
siguientes: Expansión de memoria 
(posiblemente externa) para llevar 





















Entrerfsíamos al ingeniero David Kadener, 

de Microdigital Arvoc, sobre 
tas características y posíbiíldaifes de 
la TK-90X, de reciente aparición 

en nuestro mercado. 




la máquina de 16 a 48 K, una ínter- 
fase RS-232 para módem, impre- 
sora o conform ar u n a red Jfite rfase 
paralelo Centronics para impreso¬ 
ra y un Drive de 5 1/4“con ja inter¬ 
fase correspondiente' 1 , sin embar¬ 
go el Ing. Kadener no nos Supo 


precisar cuando estará disponible 
toda esta línea de accesorios, por 
io que nos vemos obligados a se¬ 
guir esperando. Respecto al tipo 
de Drive a incorporar el Ing. Kade¬ 
ner nos comentó: “En principio la 
idea fue crear una unidad de disco 


completamente nueva, aunque exis¬ 
te la posibilidad de incorporar el 
mismo Drive que equipa el TK- 
2000 ¡ esta es una cuestión aún no 
resuelta por completo y que no de¬ 
pende (al menos por ahora) de 
Arvoc" 


Ficha Técnica: Microdigital TK-90X 


MEMORIA: 


LENGUAJE: 


ROM de 16 Kbytes. conte¬ 
niendo interpretador BASiC 
y sistema operativo. 

RAM 16 Kbytes 6 48 Kbytes. 

Intepretador BASIC, 90 co¬ 
mandos e instrucciones. Con¬ 
tro la el monitor (TV,), graba¬ 
dor y periféricos. 


MICROPROCESADOR: Z-SQ A a 3.58 MHz. 


TECLADO: 


VIDEO: 


ALMACENAMIENTO 

MASIVO: 


GRAFICOS; 


Upo QWE RTY. Acceso di rec¬ 
to a mayúsculas y minúscu- 
I as y retend ó n de mayúscu - 
las. Utiliza 4 modos distintos 
loque equivale a 192teclas. 
Caracteres ASCII. 

Utiliza un aparato de televi¬ 
sión standard, blanco y ne¬ 
gro o color. 

La pantalla se organizaran 
24 líneas de 32 caracteres. 
La entrada se realiza por las 
terminales de VHF del tele¬ 
visor. 

Utiliza un grabador a casse¬ 
tte standard a través de la 
entrada de micrófono y sa¬ 
lida de monitor. 

Además de los 768caracte¬ 
res gráficos, dispone de una 
resolución en pantalla de 
255 x 175 pixels. Posibilita 
la mezcla de texto con los 
gráficos ya definidos y de 
ambos con ios de alta reso¬ 
lución. 


COLORES: 


SONIDO: 

EDICION; 


SINTAXIS: 

OPERADORES: 

DIMENSIONES: 


Existen 8 colores que son 
generados vía teclado. 

Los colores de un plano, 
fondo y margen son selec¬ 
cionados a través del tecla¬ 
do, podiendo regular su in¬ 
tensidad por separado. 

Los 8 colores están dispo¬ 
nibles tanto en texto como 
en alta resolución. 

Directo por T.V. Sintetízador 
ra m a ndado po r B ASI C, pe r- 
mitiendo obtener 10 octa¬ 
vas (130 semitonos). 

El modo edición (EDIT) per¬ 
mite editar cualquier línea 
de programa para reformu¬ 
larla, Caracteres y coman¬ 
dos pueden ser introduci¬ 
dos, modificados o borra¬ 
dos. 

Es posible ei cambio de nú¬ 
mero de línea, alterando su 
orden en el programa. 

La sintaxis de una línea es 
probada en cada entrada. 
Sólo son aceptadas líneas 
sin error. 

Aritméticos: + expo¬ 


nencial. 

De relación: —, <, > =, 

<= O , 

Lógicos: AND, OR f NOT dan 
resultados booléanos. 
Largo: 230 mm 

Profundidad: 140 mm 

Atto: 30 mm 

Peso: 500 gr 


Los n úme ros so n en com a flotan te, perm it ¡en do u fi A v&fifici ón da S x 10 e levado hasta — 39 y 7 x 10 elevado h asta 38 con una prec ¡s ¡ón d e 
9.5 digtos decimales. * 

Acepta cualquier tipo de variable (numérica, alfanumérica) puede comparar dos cadenas de caracteres. 

No hay restricción para el número de subrutinas ni de bucles FOR-NEXT, permitiendo estes ánimos cuaipuief alineamiento. 

Además al TK-90X puede ejecutar instrucciones en modo directo y regular grálleos de la misma forma (sin pre-p'O&ramaciÓn), 

Et TK-&0X viene provisto con: una inferíase para j.oystick inoorporada.fuente de alimentación con Interruptor ON-OFF .cable de conexión 
a T.V, y grabador, cassette demostración y manual de operación en castellano. 

Todo esto con el rescaldo total en lodo el país de Microdigital Arvoc. 





















Software 

Este tal vez sea uno de los puntos 
importantes ya que del apoyo de 
software dependen casi todas las 
decisiones de compra. Obviamen¬ 
te nadie va a decidirse por un equi¬ 
po del que se disponga de pocos 
programas o que sea difícil conse¬ 
guirlos. 

Interrogado sobre estetemael Ing. 
Kadener nos contestó: "Microdigi- 
tal Arvoc tiene personal que se en¬ 
carga exclusivamente de la traduc¬ 
ción y adaptación de programas in¬ 
crementando en la medida de lo 
posible la cantidad de títulos". En 
cuanto al desarrollo propio de soft¬ 
ware nos dijo: 'Todavía no lo reali¬ 
zamos, la mayoría del material nos 
llega de Brasil y Europa y nosotros 
lo traducimos y adaptamos a nues¬ 
tras necesidades, aunque queda 
algún programa todavía que se co¬ 
mercializa en portugués”. 

'Vemos al TK-9QX como una má¬ 
quina que apunta más a la educa¬ 
ción que a la gestión comercial y 
sobre este tema existen ya varios 
programas propios de Microdigitaf 
para chicos en edad escolar”. 

El otro punto importante es la pro¬ 
visión de bibliografía que permita al 
usuario extraer todas las posibili* 
dades de que dispone el TK-90X, 
ya sea libros con programas o ma¬ 
terial que amplíe y profundice el 
manual, como sucedió con el lan¬ 
zamiento del TK-83- En esaoportu - 
n i dad el equ ipo ven ía apoyado por 
libros con programas, etc, 

‘Cuando presentamos ei TK-83 
—dice el Ing. Kadener— tuvimos 
suficiente tiempo, pero ai lanzare! 
TK-90X ocurrió un desfasaje de al¬ 
rededor de dos meses (en Argenti¬ 
na el equipo se presentó en mayo y 
en Brasil en julio) que nos retrasó 


bastante, de todas maneras, algu¬ 
nos libros ya están a cunto de ter¬ 
minarse y creo que en un lapso no 
mayor de dos meses contaremos 
con ese material. Por ahora el TK- 
90X se entrega sólo con un ma¬ 
nual en castellano.” 

Arvoc en Argentina 

En este momento las TK-9GX lle¬ 
gan completamente armadas, una 
vez aqu í se realiza el control de ca¬ 
lidad (tanto del equipo como del 
soporte), se coloca un número de 
serie para Argentina, se hace una 
última revisión y el equipo queda 
listo para ser comercializado. 
Consultado sobre el futuro el Ing. 
Kadener respondió: “Existe un pro¬ 
yecto de la empresa dentro del 
plan industrial que tiene como ob¬ 
jetivo llegar a fabricar en nuestro 
país tanto Ea máquina como los pe¬ 
riféricos propios; dentro de estos 
periféricos no incluimos ni impre¬ 
soras ni módems, ya que conside¬ 
ramos que en plaza existen sufi¬ 
cientes alternativas". 

Conc lus iones 

Al encender por primera vez un TK- 
90 X nos encontramos con la pan¬ 
talla de presentación y la “sorpre¬ 
sa" def sonido saliendo por el TV, 
Esta característica parece a sim¬ 
ple vista útil sólo para disfrutar con 
juegos, pero ai trabajar con algún 
programa de aplicación estos sue¬ 
len tener incorporadas señales so¬ 
noras que nos indican que algo 
anda mal o que no estamos entran¬ 
do datos correctamente, etc,, al 
disponer de sonido por T.V. y regu¬ 
lar su volumen, estos avisos resul¬ 
tan infalibles. 

Por otro lado el joystick que pro¬ 
vee la firma funciona correctamen¬ 
te au nque su aplicación queda res¬ 


tringida sólo a aquellos programas 
que utilicen las mismas teclas de 
control que Ja interfase incorpora¬ 
da. 

Un detalle al q ue hay que acostum¬ 
brarse es el teclado. Al principio 
resulta un poco “gomoso", da la 
sensación de que las tedas se que¬ 
daran pegadas y no se levantan, 
pero es a Igo a 1 os q ue nos acost u m - 
bramos muy rápidamente, Por lo 
demás, el teclado funciona bien 
manteniendo el mismo código de 
colores y características de curso¬ 
res que el Spectrum. 

Es un detalle útil el interruptor de 
corriente incorporado en la fuente 
de alimentación, ya que ante un 
“sistem crash", evitamos el desgás¬ 
te de la ficha de conexión portan do 
la energía con dicho interruptor. 
Pero tal vez la característica más 
saliente es su compatibilidad con 
una máquina que ya tiene casi 3 
años en el mercado mundial, mu¬ 
cha experiencia y abundante infor¬ 
mación , pe rif éricos, accesorios f etc., 
que el usuario de un TK-9GX pue¬ 
de aprovechar para agrandar su 
sistema pero, partiendo de un equi¬ 
po más pulido. Así es que los pro¬ 
pios Microdrives de Sinclair, Sos 
Wafadrives, Digital Tracer, Infarta¬ 
ses de discos varias y cualquier 
interfase o periférico Sinclair, for¬ 
me también parte del mundo del 
TK-90X. Si sumamos lo dicho a un 
precio razonable, nos encontramos 
con un equipo que cubre correcta¬ 
mente las necesidades para la que 
fue creado, y que se coloca en un 
nivel de competencia directa con el 
Spectrum. 

Sólo nos resta hacer público nues¬ 
tro “muchas gracias" al Ing. David 
Kadener por su atención. 

HUGO ÍÍUSSO 


CASSETTE VIRGEN 
PARA COMPUTACION 

• Fabricación propia 

• Utilizamos cintas Ampex Ferrocobalto 

• Las medidas se preparan en el día 

Producciones ECCOSOUND $ r A„ 
Tronador 611 * (1027) Cap* 
551-9469 / 5S3-50&0 f 553-5063 

OFRECEMOS CALIDAD V PRECIO 
AL SERVICIO DE LA TECNOLOGIA 

é CONSULTENOS * HACA SU PEDIDO 
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PARA IMPRESORA 


tNG. PEDRO E. COLLA 


E n la Primera Parte de este 
artículo fue expuesta !a por¬ 
ción de hardware de una in¬ 
terfaz Centronics para co¬ 
nectar un computador TS206 8 con 
cualquier impresora que respon¬ 
diera a la citada norma. 

El circuito, si bien esencial, cons¬ 
tituye únicamente una fracción de 
la interfase, pues, por sí solo el 
computador no puede detectar su 
presencia y mucho menos utilizar¬ 
lo. 

Es necesario incluir una porción de 
software, a menudo denominado 
DRIVER que contenga las instruc¬ 
ciones necesarias para manejar 
adecuadamente el intercambio de 
información con el impresor. 

En artículos anteriores hemos te¬ 
nido oportunidad de describir la 
forma en la cual el computador TS 
2068 se comunica con sus perifé¬ 
ricos (teclado, pantalla e impresor 
térmico) a través de circuitos lógi¬ 
cos denominados CANALES. 

En realidad no es totalmente im¬ 
prescindible el relacionarse intima¬ 
mente con la arquitectura del com¬ 
putador para utilizar el impresor, 
puesto que hasta un sencillo pro¬ 
grama como ef indicado en la figu¬ 
ra 1 podrá ser suficiente para tal 
cometido. 

No obstante sería ideal que se pu¬ 
diera utitiíar cualquier programa 
destinado a disponer del impresor 
térmico con uno tipo Centronics 
sin introducir modificaciones en el 
mismo. 

Y desde el punto de vista del uso 
diario resulta relevante el poder 
acceder a las instrucciones con¬ 
vencionales LPRI NT/LLIST sin preo¬ 
cuparse en el detalle de la impre¬ 
sión individual de cada carácter. 
Para ello será necesario introducir 
eldriverdetal manera que éste sea 
transparente a cualquier programa 
BASIC, e indicarle al computador 
que se lo desea utilizaren lugar de 
la sección del ROM destinada al 
impresor térmico cada vez que se 
utiliza alguna de las Instrucciones 
mencionadas. 

La primera de las condiciones se 
logra mediante e! uso de lenguaje 
Assembler para la confección del 
driver, colocando el mismo en un 
área de memoria fuera de la incum¬ 


bencia del intérprete BASIC, 

La segunda, se logra modificando 
la vía por la que procede en condi¬ 
ciones standard el computador al 
utilizar el impresor térmico. 

El impresor térmico es manejado a 
través del canal número 3 de En¬ 
trada/Salida (el 1 es el teclado y el 
2 la pantalla de video),, Cuando el 
intérprete desea transferir algo a 


t ravó s d e u n can al accede a una zo¬ 
na de las variables de sistemas de¬ 
nominada STRMS cuya dirección 
de comienzo es 23568d (5C10H), 
esta zona contiene una tabla que le 
índica para cada canal dónde co¬ 
mienza la descripción del mismo 
dentro del área de variables deno¬ 
minada CHANS, la cual comienza 
en 236310 Í5C4FH). 


Figura 1 


10 REM--- 

20 REM % 

30 REM * PrÍnter 

40 REM * Este Programa Puede aer 
50 REM % utilizado como rutina 
60 REM t de impresión Pura la 
70 REM % interfaz Centronics. 

80 REM % El carácter a imprimir 
90 REM * debe inflreaar en la 

rutina dentro 

100 REM * de la variable Y* 

110 REM * 

120 REM —--- 

130 IF IN 63=255 THEN GÜ TCl 130 
140 OUT 63, CODE <Y») 

150 RETURN 


Figure 3 

1 REM---*--- 

5 REM * P»tch 

3 REM t E&ti. rutina carga y habilita «1 
drivar d* ImPrtsora Centronics 

10 REM * 

13 REM —--------—- 

20 INK 7' SDRDER 2' PAPER 4= CLS 
30 PR1NT AT S¿ 10j " IJ i AT 8, i2j"P*tch" j 
AT 9, 13/"2.0"i AT 12, 5 j "Conf Í9Ur*cion d 
e Fr Inter 1,1 
50 INK 4 

60 REM ****** CONFIGURA EL CANAL # 3 ****** 

70 CLEflR 56133* POKE 26703,136i PGKE 

26704,213- PÜKÉ 26705 j 136- PDKE 26706/213 
LOAD "Patch.L" CODE 56200¡ ÚN ERRR RESET i GQ TÚ *0 
80 1/100 


K£4 
















































intercambio de íti/ormación entre la 
TS-2Q68 y cuaíquier impresora , 


En esta ultima zona cada canal es 
dése ripio medíante 5 bytes Eos 
cuafes contienen; 

1) Dirección ae ia rutina de salida 
en el ROM (2 bytesjcuando el mis¬ 
mo es utilizado para conducir da¬ 
tos desde el computador hacia el 
exterior, 

2) Dirección de la rutina de entra¬ 
da en el ROM (2 bytes) cuando el 
mismo es utilizado para conducir 
datos en sentido i rj verso, 

3) Especificación de! Dispositivo 
{1 byte) sirve para distinguir ei tipo 
de periférico que se maneja con el 
canal. 

Nótese que, en ei caso de la pan¬ 
talla de video y ei impresor, el canal 
es utilizado corno salida únicamen¬ 


L 

£0010 --— — — 

00020 ¿FflTCH 

00030 ¿DFUVER EN ML PARA 
000*0 ¿UTILIZAR IMPRESOR CON 
00050 ¿COMPUTADOR TS2B68 A 
00060 i TRAVES DE INTERFAZ 
00070 ,PARALELO. 

00030 ,- 

00050 ¿ —--- 

00100 jDIRECTIVAS AL ASSEMBLEP 

00110 i“ w -~ — --- 

00120 GRG 36200 

00130 ENT 

00140 } ————— 

ae 150 ¿almacena en auxiliar el 

08*60 ;CONTENÍ00 DEL flCC.fl 

00170 ¿PARA NÚ PERDERLO 

00 I&® i —i— —----- 

00130 STPRT LD {MEM fi 

00200 i-----—■-■ -- 

00210 j INTERCEPTA LOS CHfsRS, 
0S220 í DE CONTROL, ESTOS SON 
00238 i 0S/14/15d fraíleos 
00240 i 10/I3d cr Y IT 

30250 ; -—-- 

00260 CP *08 
00270 JR Z,DIRECT 
30280 CF 14 
30250 JR Z,DIRECT 
60300 CF 15 
0&310 JR Zj DI REGI 
0B320 CF 10 
03330 JR ZíCRLF 
00340 CP 13 
00350 JR ZjCRLF 

00360 j--- 

00370 ;Sí ES OTRO CARACTER DE 
003S0 * CONTROL LO IGNORA 

00330 J -----— 

00400 SUB 32 
00410 JR CiIGNOR 

004 20 i - -1 —^ ^ - h ,—-— 

00430 ¿ RESTAURA EL ACUMULADOR 
30440 i ——— 


te, por lo tanto la especificación da¬ 
da por el punto 2) carece de senti¬ 
do, La situación inversa se da con 
el teclado,en el cual es el punto I) 1 
ei que pierde significado. 

El método intrincado de acceso es 
debido, primariamente, a la flexi¬ 
bilidad que previeron losdiseñado- 
res del computador para el agre^ 
gado de dispositivos externos, ori¬ 
ginalmente no previstos por ei fa¬ 
bricante. 

Desde la óptica de nuestro obje¬ 
tivo todo se reducirá a alojar la 
rutina de Driveren alguna sección 
conveniente de memoria y colocar 
ia dirección de la misma en la po¬ 
sición correcta para ei canal # 3 
dentro del área de variables de 
sistemas CHANS. 


Figura 2 

00459 
00460 
0047® 

00436 
0043® 

00500 
00510 
00520 
00530 
00540 
00550 
00560 
00570 
00330 
00530 
00600 
00610 
00628 
00636 
00646 
00650 
00660 
00670 
0®SB<3 
0063® 

00700 
06710 
0072® 

00736 
0074® 

0075® 

0076® 

00770 
®07E0 
®0730 
00300 
00310 
00320 
00336 
00S40 
00S50 
00360 
00B70 
00330 
00S90 


En (a figura 2 se puede observar el 
drive de software en lenguaje As- 
semble r, nótese que esencialmen¬ 
te no difiere de la rutina en BASIC 
previamente expuesta,excepto en 
lo referente a cuidar la traducción 
de caracteres compuestos, como 
las instrucciones BASIC, por ejem¬ 
plo, donde el computador envía un 
carácter representativo de varios. 


En la figura 3 se observa un peque¬ 
ño programa en BASIC cuya misión 
es la carga del driver y el acomo¬ 
damiento de las variables de siste¬ 
mas para su uso. Nótese que, al fi¬ 
nalizar la ejecución r el mismo se 
autodestruye dejando el computa¬ 
dor libre para cualquier otro uso. 
La forma de operación será senci- 


£03® ® CrtLL üutx 
0091® RET 

®&32® ¿ —----- 

0093® ¿CUANDO UN CARACTER ES 
0094® ;IGNORADO IMPRIME UN 
®095® ¿ESPACIO EN BLANCO 
0096® ¿ 

0Ü97® IGNOR LD A,32 
0033® CRLL WRÍT 
0033® CRLL GUTX 
0106® RET 
01010 

0102® ;BUSQUEDA EN UNA DE LAS 
0103® ;TABLAS DE CARACTERES 
0104® ;ESPECIALES 
0105® i ESTOS CARACTERES 
01060 i PROVOCAN £L ENVIO DE MAS 
01070 J DE UNO A LA IMPRESORA 

010SO J—-— 

3103® SPEC2 LD A,ÍNEM> 

0110® LD e..o 
01110 LD HL.TAB2 
01120 SUB 123 
01130 LD tftUX>,A 
01146 JR. LÚPr 

01150 ¿ —--- 

Éll60 ¿RUTINA -LJfllT- 
61170 ; 

®U30 i ESTA RUTINA VERIFICA QüL 
01130 i EL IMPRESOR ESTE LIBRE 
®1£0® ¿V DE NO ESTARLO QUEDA EN 
01210 ¿LOOP HASTA ftUE ESTA 
0122® ¿CONDICION SEA CIERTA 

01230 i ------ 

01240 NA IT PUSH AP“ 

01250 LOOP IN A,<#3F> 

61260 BIT Ü,R 
01270 Jft NSji LOOP 
0123® POP RF 
01230 RET 

01300 ¿-—— 

01310 >RUTINA -OOTX- 
01320 ¿ 

¿U330 ¿ESTA RUTINA ENVIA A LA 
01340 r interfaz el carácter 


LD A-íMEM) 


jSI ES UN CARACTER SIMPLE 
¿LO IMPRIME DIRECTAMENTE 


3ÜB 12S 
JR C >DIRECT 
LD A.CMEM) 

¿VERIFICA SI ES UN 
¿CARACTER ESPECIAL DE 
¿SINCLAIR Y NECESITA SER 
¿EXPANDIDO. 

¿DE SER ASI DECIDE QUE 
j TABLA UTILIZARA 

SUB I2S 
JR C,SPEC2 
LD fluíMEM ? 


rEL RESTO SON IGNORADOS 

y -—»■»» ■ — f M ■■ ■■h'ÜMIi ■ . m a—» 

SUB 165 
JR C,IGNOR 
JR SFECIALS 


¿SECCION DE PRINT DE 
¿CARACTERES INDIVIDUALES 

DIRECT LD 
CALL WATT 
CflLL OUTX 
RET 

¿RUTINA DÉ MANEJO DE 
¿ cr tretorno de carro> 

¿ If tsaIto de- linea} 

¡ POR CUALQUIERA DE LOS 
¿DOS EJECUTA AMBOS 

¿RLE LD A,10 
CALL WA1T 
CRLL OUTX 
LD A.13 
CALL UAIT 






































lía, inmediatamente luego del en¬ 
cendido se deberá cargar el pro¬ 
grama dedriverySuego utilizar nor¬ 
malmente la máquina, eso sí con el 
adicional que el impresor Centro¬ 
nics responderá a los comandos 
LLIST/LPRINT, 

Normalmente, al autodestruirse el 
cargador, finalizará con ei mensa¬ 
je de error FOSENSE IN BASIC" 
producto de querer seguir ejecu¬ 
tando un programa inexistente, es¬ 
te error es normal y no debe ser te¬ 
nido en cuenta. 

Debido a la residencia en RAM, 
cualquier evento que destruya el 
contenido de la memoria (apagado 
del computador por ejemplo) tam¬ 
bién destruirá el Priver por lo que 


@1350 ¿A SEP IMPRESO 

01360 í--—— 

@1370 GUTK QUT Í#3F>,R 
@1380 RET 

t)í J30 ¿ — — — — — — — ™ ■“*“ 

014&0- ¿RUTINA -SPECIRLS- 
@1410 ¿ 

01420 i RUTINA DE MANEJO DE 
@143® ¿ IMPRESION DE CARACTERES 
01440 ;ESPECIALES 

01450 j~----- 

@1460 SPECIRLS LD FL< MEM ) 

01470 LD < AUX 
01480 LD B,@ 

01490 SUB 165 
01500 LD < AUN A 
01510 NÜP 

@1520 i —* — 

01530 ¿PARA LA IMPRESION DE 
@1540 j LA MAYORIA DE LOS 
01550 ; CARACTERES SE ACCEDE 
01560 ¿A LA MI SNA TABLA QUE 
01570 =; UTILIZA EL COMPUTADOR 
015B@ ¿PARA GENERAR VIDEO V 
01550 i QUE ESTA EN LA ROM 

01600 i--’------— 

01S10 LD HLj153 
01630 LOPY LD FL<AUX> 

01630 CP B 
@1640 JR ZjIMPRI 
01650 LQPX LD RAHL) 

@1660 CP " a 4 
01670 JR 2 ,NOIMPRI 
@1630 BIT 7, A 
@1690 JR N2.NEXT 
01700 INC HL 
@irl@ JR LOPX. 

01720 NEXT INC HL 
@1730 INC B 
01740 JR LOPY 

@1750 ---—■- - 

01760 ¿RUTINA -IMPRI- 
01770 ,RL COMENZAR ‘UN 
01730 ;CARACTER MULTIPLE PONE 
0175-0 ¿UN ESPACIO EN BLANCO 

@1800 ----- 

@1S1@ IMPRI LD A/ a 
@1820 CALL WA1T 
@1030 CALL OUTX 

01840 j-——-— 

01350 i IMPRIME EN FORMA SERIE 
81S68 ;TODOS LOS CARACTERES 
0137@ ¿ FORMANTES DEL CARACTER 
018B0 i MULTIPLE, 


será necesario cargarlo. 

Nótese que no se coloca el mismo 
al tope de memoria, donde interfe¬ 
riría con determinados utilitarios 
importantes para el autor (como el 
ZEUS-ASSEMBLER), pero,a su vez, 
al estar colocado donde lo está 
produce un acortamientode la me¬ 
moria útil de! computador. 

Cada iector podrá entonces modi¬ 
ficar la posición donde cargará el 
driver en i uncién de sus propias ne¬ 
cesidades si es que la provista no 
le es adecuada, deberá en este 
caso cuidar que, de modificar en la 
carga del mismo Jas posiciones del 
área CHANS para que reflejen la 
nueva ubicación. 

Cabe por ultimo advertir que este 


01890 ;--—— ---- 

01300 IMPRIME LD AjCHLÍ 
01910 BIT 7jñ 
01920 JR NZj Nüí1 
@1930 CALL WALT 
@1940 CALL OUTX 
@1350 INC HL 
@1960 JR IMPRIME 

@1370 ¿---■ - 

@1380 ¿CUANDO ES MULTIPLE 
01390 ¿DETECTA EL ULTIMO PUES 
@2000 ¿TIENE SU BIT NftO 7 EN 
@2010 ¿ALTO, PARA IMPRIMIRLO 
02020 ¿DEBE COLOCARLO EN CERO 

@2030 -- — -— r -"—-— -— 

@2040 NO ti AND #7F 
02056 CALL NRIT 
02060 CALL OUTX 

@2070 ; ---- - - 

02030 ¿AL FINALIZAR TAMBIEN 
02030 ¿ADJUNTA UN BLANCO 

021S0 ¿ -- -— 

02110 NO IMPRI LD A, |J 
02120 CALL WAIT 
02130 CALL OUTX 
@2140 RET 

02150 ¿- -- 

@21S@ i DEFINE AUXILIARES fi 
02170 ;SER UTILIZADOS POR EL 
@2188 i DPI VER 

02130 ¿ -- - ———- 

02200 AUX DEFB #00 
@2210 MEM DEFB #80 

S2220 ¿--- 

02230 ¿DEFINE LA TABLA 2 DE 
92240 ¿CARACTERES ESPECIALES 

02250 ¿ —. ---—- 

02260 TAB2 DEFM sQH ERR^ 

02278 DEFB 210 
022S0 DEFM XSTIC^ 

02230 DEFB- 203 
02308 DEFM /SOUtV 
02SI0 DEFB 136 
02320 DEFM /FRE/ 

@2338 DEFB 197 
02340 DEFM /RESE/ 

@2358 DEFB £12 

@2360 i -— - 

0237B ¿RUTINA DE COPY 
02280 ¿ESTA RUTINA NG FORMA 
02390 ¿PARTE DEL DR1VER Y DEBE 
02480 ¿SER INVOCADA MEDIANTE 
02410 ¿ Pruit UrS-f" <3Ldrei£> 
02423 ¿ 


programa no funcionará con cier¬ 
tos programas que, conteniendo 
secciones en código de máquina, 
utilizan la misma área de memoria 
que el driver, debiéndose en esos 
casos modificar el mismo en forma 
acorde. 

En lineas generales tal como está 
presentado en el artículo se podrá 
uti liza r si n i neo n ve nientes con cual¬ 
quier programa BASIC típico que 
desee construir el lector, en'pró¬ 
ximas entregas se indicarán las 
modificaciones necesarias para po¬ 
der utilizar también programas tí¬ 
picos tales como la planilla electró¬ 
nica (VU-CALC), el administrador 
de datos (VU-FILE)y el procesador 
de palabra (TASSWORD). 


@2433 ¿SU FUNCION ES EMITIR 
02448 ¿COPIA DE Lfl PANTALLA 
82441 ; POR EL IMPRESOR, 
02442 i PARA ELLO LO COLOCA 
82443 ¿PREVIAMENTE EN MODO 
02444 ¿GRAFICO. 

02445 ¿ 

62446 ¿ < C 5 A.Galanternik 
@2447 ¿ 1333 

62443 j—----- 

02450 BTR LD Hl,#4©@@ 

02460 LD E,27 
@2470 £C LD EL 7 
02430 TRS CÑLL TRN 
02498 LD ñ/r 
02506 AND H 
02510 INC A 
02526 BIT 3,A 
02530 JR Z.3FIL 
02546 LD B-L 
02556 CP #E8 
O2560 JR N2JDFIL 
02570 INC H 
02580 XQR A 
O2590 LD L.A 
02660 JR CON 
02610 OFIL LD R.L 
0862O RDD fl,#80 
@2638 LD L, A 
@2640 LD A.H 
@2650 SUB 7 
02660 LD FUA 
82676 JR CON 
@2630 SFIL INC H 
02690 CON DJNZ TRS 
82780 CALL TRXLIN 
02710 DEC E 
@2720 JR NZ.SC 
O2730 LD B, 15 
02740 CALL SEND 
02750 RET 
0276© TRN PU3H DE 
62776 PUSH BC 
02786 PUSH HL 
02738 LD A.CPBUF} 

02S80 LD E¿ A 
02318 LD fti (FBUF+1> 

02888 LD D,ñ 
02330 LD BC ,#0820 
02S40 LD1R 
0235S LD A £ 

02366 LD (P3UF>,ft 
0237© LD B,D 
02S3G LD (PeUF+n.A 
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02Q90 POP HL 
G290S POP BC 
02510 POP DE 
02920 RET 

02930 TRXIIN PUSH DE 
02940 PUSH HL 
02950 LD FU 08 
82368 CflLL SEND 
02970 LD HL.BUFF 
02380 LD E>*2d 
0299S X3 LD D,@Ü 
03000 X2 PUSH HL 
03310 LD B,7 
03020 XI RLC < HL) 
O3O30 RR C 
0304O PUSH BC 
03050 LD SC.#O020 
S3060 HDD HL.SC 
03070 POR SC 
03030 DJNZ XI 
0309O flND B 
031O0 CCF 
03110 RR C 
83120 LD R,C 
03130 CfiLL SEND 
0314O POP HL 
0315O DEC D ■ 

03160 JE NZ,X2 
S3170 INC HL 
031SQ DEC E 
03190 JR NZ.X3 
032S0 CBLL CPLF1 
03210 LD HL.BUFE 
03220 LD FUL 


03230 LD (F'EIJF Xñ 
03240 LD ii, H 
03250 LD < PBUF+l>#ñ 
03260 POP HL 
03270 PÜP DE 
0323B RET 

03290 SEND PUSH BF 
83300 SE IN B,C#3F> 
03310 EXT ü. B 
O3320 JR NZj SE 
03330 FDP RF 
O3340 ÜUT <#3F>,R 
83350 RET 

0336O CR-LF 1 LD fi, #0D 
03370 CRLL SEND 
0333S LD FI.,#0FI 
03390 CHLL SEND 
03408 RE! 

0341O 6UFF DEFS 238 
O3420 PBUF DEPW BUFF 
03430 FIHPROG NOP 


SIMBOLS 

flDRESS TflBLE 

FINPRÚG 

= #DDF0 

SE 

* #DCF3 

CPLF1 

= ttDCFD 

XI 

= #DD03 

2 


X3 

= #d cce 

BUFF 

= #DO0S 


PBUF 

SEND 

TRXLÜ1 

CON 

OFJL 

3FIL 

TRN 

TES 

SC 

STR 

NO II 

IMPRIME 

NEIXT 

NOIMPRI 

LOFX 

IMPRI 

LOOP 

Lopy 

fiUX 

TRB2 

OUTX 

URIT 

SRECIAL' 

SPEC2 

IGHOR 

CRLF 

DIREGI 

MEh 

STRRT 


- ftDDEE 
= #DCF£ 
= #DCB4 

- #DC8fi 
= #DC7F 
= #DC39 

- #DC3S 

* #DC6R 
= #DCi£8 

- #DC63 
= #DC36 
= #DC28 

- tfDClC 

- #DC3E 

- #C'C 10 
= Í&C20 

- 4DBEE 
= #DCGR 

* #DC4? 

- 4DC49 
#DBF6 

=* #DEED 
= #PEF9 
= ttDBDE 
” #DSD5 

- #DBC4 
= 4DESB 
= #0643 

- tfl>BS3 


T 

St-art of source = 327 
LénEth = 052 


MOIRA 


su ayudante de archivos, lo hará feliz!! 


Primera Base de Datos en serio para usuarios de 
Commodore 64, 

Manual y comandos totalmente en castellano. 
Basta de Gpen, Glose, etc., etc. 

En 15 minutos define la estructura y ya ingresa 
datos. 

Versión diskette o Cassette, 

30.000 caracteres a su disposición. 

Libre definición de campos en sus archivos. 
Altas, Bajas y Cambios a sus archivos. 
Búsquedas por cualquiera de sus campos, parcial 
o totalmente. 


Ordenamiento de igual modo. 

Salidas por pantalla y/o impresora con 
encabezamiento predefinido por el usuario. 
Senciiias operaciones a través de menúes. 
Rápido desarrollo de aplicaciones prácticas 
inmediatas, historias clínicas, agenda, 
vencimientos, guía telefónica, stock, apuntes, 
fichero, bibliografías, etc. 

Increíble precio lanzamiento, A 33.* 


Produce y distribuye: 




COMPUTACION 


BARRI ENTOS 1566 P.B, tf C M 

(1116) * Tet.i 024-BB43/2S46 Cap. F*d. 

En vi DI fll interior c on ira giro o choque 
a La orden de. O ESA COMPUTACION 5RL 
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PARABOLA 


Nuestra TI-99/4A además de jue¬ 
gos, gráficos, gráficos con sprites y 
muy buenas melodías, nos brinda 
la posibilidad de confeccionar pro¬ 
gramas que se ajusten a los conte¬ 
nidos curricula res de! ciclo prima¬ 
rio y secundario y a las diversas 
asignaturas, Hoy desarrollaremos 
juntos un programa, dedicado es¬ 
pecialmente a los alumnos que 
cursan el 4to. año del secundario; 
hace referencia a la unidad: “Fun¬ 
ciones de segundo grado 13 de la 
asignatura Matemática. 

Muy interesante es el tratamiento 
que hace laTl-99/4Adeitema FUN¬ 
CIONES. Están al alcance del usua¬ 
rio: 1) las funciones preprograma- 
das.es decir ya definidas,como por 
ejemplo: SQR, INT, ABS,.„ y 2) las 
funciones definidas por el usuario, 
utilizando la expresión DEF. 

En nuestro programa deberemos 
definir una función; concretamen- ] 
te una función de segundo grado. 
La expresión DEF nos permitirá 
definirla y poder usarla en cual¬ 
quier parte de! p rog ra m a, hac iend o 
sólo referencia al nombre que le 
dimos. 

Recordemos que fa ecuación de 
segundo grado explícita y compíe¬ 
la es de la forma: 

Y {X)—AxX 2 + BxX+C 

Al confeccionar ia gráfica de una 
runción de segundo grado en un 
sistema de coordenadas cartesia¬ 
nas obtendremos una parábola, Va-> 
mos a tratar de caracterizarla con 
tres ejemplos convenientes en la 
Figura 1. 

En e! ejemplo 1, el eje de simetría 
es la recta, S=3. El vértice, el punto 
V=(3;4). Las raíces son números 
reales y distintos, X1=1 y X2=5. 

En el ejemplo 2, el eje de simetría 
es ja recta, S=-4, El vértice,el pun¬ 
to V=(-4;0). Las rafees son núme¬ 
ros reales y come iden, X1 — X 2 =-4 
En el ejemplo 3, el eje de simetría j 
esta recta, 3=10. El vértice, el pun- ' 
to V=(10;2), Las raíces son mime* 
ros complejos conjugados. 

Después de repasar nuestros co¬ 
nocimientos matemáticos tratare¬ 
mos de traducirlos al lenguaje BA- ¡ 


SIC, dando forma a un programa 
que satisfaga a nuestra TL99/4A, 
Concretando, nuestro enunciado 
dirá. Confeccionar un programa 
que permita obtener una tabla de 

valores, el eje de simetría, el vérti¬ 
ce y las raíces de una parábola, in¬ 
gresando previamente tos coefi¬ 
cientes de ia ecuación de segundo 
grado. 

Le ordenamos que numere a partir 
de 10 y de 10 en 10, 

NUM 10 

Limpiamos la pantalla ai comenzar 
la ejecución del programa, 

10 CALL CLEAR 

En el ingreso de datos, colocamos 
un cartei aclarando que ei coefi¬ 
ciente A debe ser distinto de cero, 
en caso contrario anularía la ecua¬ 
ción de segundo grado, 

20 INPUT 'INGRESE TRES VALO¬ 
RES, A DISTINTO DE CERO ”A,R,C, 
Utilizaremos la expresión DEF pa¬ 
ra definir nuestra fundón y poder 
recu rri r a ella e n cu alq u i e r pa rte del 
programa, 

30 DEF YÍX>=A*X A 2+B*X+C 
Si reemplazamos a X por otro valor; 
nuestra computadora resolverá el 
segundo miembro y nos entregará 
el valor numérico correspondiente. 
Con lo que acabamos de decir po¬ 
dríamos usar la fuerza de la expre¬ 
sión DEF y pedirle que nos confec¬ 
cione una tabla de valores; previa¬ 
mente la encabezamos con un títu¬ 
lo asi: 

40 PRINT 14 X Y 11 

Delante de 3a X y detrás, dejare¬ 


mos un espado debajo, la variable 
numérica, 

La tabla fa originamos con la es¬ 
tructura FOR-NEXT, con un inter¬ 
valo en el eje de ja X de —3 a 3. 
50 FOR X=—3 TO 3 
Dentro del ciclo FQR-NEXT le pe¬ 
diremos que nos Imprima cada uno 
de los valores de X y a continua¬ 
ción cada uno de los valores numé¬ 
ricos que surgen de reemplazar el 
de X en la ecuación dada, 

60 PRINT X;Y[X) 

por ejemplo, primeramente la X 
tomará el valor -3 Jo reemplazará 
en el segundo miembro y e! núme¬ 
ro obtenido lo imprimirá a conti¬ 
nuación de —3. 

70 NEXTX 

cerramos el ciclo FOR-NEXT. Lue¬ 
go dejamos un renglón de separa¬ 
ción, 

80 PRINT 

Le enseñaremos a hallar la ecua¬ 
ción del eje de simetría; la fórmula 
es, e j e de s i m etr ía=— S/(2x A). I o t ra - 
decimos ai lenguaje BASIC y lo 
guardamos en 3a variable S, 

90 S=-B/(2*A) 

después de hallarlo, le pediremos 
que nos lo imprima, 

100 PRINT “EJE DE SIMETRIA, 

S- M ;S 

todo to que está entre comillas 
nuestra computadora lo copiará 
textualmente y a continuación es¬ 
cribirá el valor numérico guardado 
en la variable^S, Luego dejaremos 
un renglón de separación. 

110 PRINT 

Queremos conocer ahora el vérti- 


, Xaraa¥ de Gomálei, <=°n sus alumnos. 

Ua profesora María Liarán Xargay Oe 
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Como ya hemos venido haciéndolo , queremos destocar ¡as aplicaciones que se 
efectúen de las computadoras en los más diversos campos> En estas páginas, se 
ofrece el trabajo de la profesora Nuria Durán Xargay de González r de la 
Escuela Argentina Modelo. Invitamos a los usuarios a enviar sus ideas, que 

serán premiadas por K 64 . 
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ce de nuestra parábola .como es un 
punto en el plano Je diremos que lo 
imprima como un par ordenado, te¬ 
niendo en cuenta que el primer 
componente de ese par ordenado 
coincide con el valor del eje de si¬ 
metría, es decir lo que está guar¬ 
dado en la variable S, El segunde 
componente surgirá de reempla¬ 
zar el valor de S en el segundo 
miembro de nuestra función, es 
decir Y(S). Lo imprimiremos con los 
carteles correspondientes para dar¬ 
le forma de par ordenado, 

120 PRINT 'VERTICE 

(S);T 

Hasta aquí ya hemos logrado: la ta¬ 
bla de valores,el eje de simetría y el 
vértice. Dejamos un renglón: 

130 PRINT 


Le explicaremos ahora a nuestra 
computadora cómo hallar las raí¬ 
ces de nuestra ecuación, previa¬ 


mente igualada a cero La fórmula 

yi yo— ~B ± y'ffi^~4xAxC 

2XA 


esta fórmula tiene una raíz cuadra¬ 
da; podrá surgir el inconveniente 
que el radicando, es decir B 2 —4xA 
xCsea negativo,en este caso nues¬ 
tra TI -99/4A no sabrá resolverlo ya 


que sólo trabaja con números rea¬ 
les y para hallar el valor de una raíz 
cuadrada negativa se deberá uti¬ 
lizar la unidad imaginaria. Como 


debemos tener en cuenta este in¬ 
conveniente, hallamos el radican¬ 


do: 

140 R=B 2-4*A*C 
Recordemos que si Res mayor que 
cero la parábola cortará al eje de 
las X en dos puntos, llamados: raí¬ 
ces de la parábola; éstas serán dos 
números reales y distintos. 

Si R“0 la parábola será tangente al 
eje de las X y las dos raíces serán 
números reales e iguales. Si R es 
menor que cero la parábola no cor¬ 
tará al eje de las X y las raíces se¬ 
rán dos números complejos conju¬ 
gados. 

Siguiendo con nuestro programa, 
preguntaremos cómo es R,hacién¬ 
dolo de tal manera de seguir el or¬ 
den de la explicación anterior y 
completando primero el camino del 


L, no 


ii 


150 1F R<0 THEN 

el camino del Hl si n lo completare¬ 
mos luego, si la respuesta es “no”, 
preguntamos por una de las dos al¬ 
ternativas, 

160 1FR 0 THEN 

El camino del "si” lo complementa¬ 
re mes i uego, s i la resp u esta es “rt o 7 ' 
ya sabemos la calidad de nuestras 
raíces, lo escribimos en un cartel, 
170 PRINT “LAS RAICESSON REA¬ 
LES Y DISTINTAS" 

guardamos ahora el valor de las raí¬ 
ces en dos variables: XI y X2, tra¬ 
duciendo la fórmula al BASIC, 

ISO X1 =(—B+SQR(R))/f2*Aj 
190 X 2=(— B—SQ R (R ))/{2 * A) 
hemos utilizado la función SQR 
para extraer la raíz cuadrada de un 
radicando positivo. Escribimos la 
instrucción de impresión conve¬ 
niente para que en pantalla y en la 
ejecución del programa se observe 
una raíz debajo de la otra, 

200 PRINT “X1 =”;X1 :”X2=*;X2 
y terminamos, 

210 END 

Hemos completado un sólo cami¬ 
no. Volvemos a la instrucción 160 y 
la respuesta es “si”, debemos com¬ 
pletar este recorrido, lo haremos 
ahora. La instrucción quedará: 160 
IF R=0 THEN 220. 

Enlazaremos la 160con la 220 con. 
la respuesta i; si”, escribiremos en 


un cartel la clase de raíces que se 
obtendrán, 

220 PRINT M LA$ RAICES SON 
REALES Y COINCIDENTES" 

Dado que el radicando es cero la 
ecuación quedará reducida a: XI — 
X2= ~B_ que es el valor de S 3 
2xA 

230 PRINT “X1^X2^”;S 
habremos finalizado este recorri¬ 
do, lo llevamos al fin, 

240 GOTO 210 

Acabamos de completar otro cami¬ 
no. Volvemosa la instrucción I50y 
la respuesta es "si”, debemos com¬ 
pletar este recorrido, lo haremos 
ahora. La instrucción quedará: 

150 ÍF R < 0 THEN 250, En "si”, 
escribiremos en un cartel la clase 
de raíces que se obtendrán. 
25QPRINT N LAS RAÍCES SON NU¬ 
MEROS COMPLEJOS CONJUGA¬ 
DOS” 

Sabemos que nuestro R es negati¬ 
vo. El tratamiento de las raíces será 
un poco delicado, dado que habrá 
que imprimirlas en forma bínómica 
o par ordenado; optaremos por la 
segunda dado que nuestra compu¬ 
tadora nos ofrece más facilidad 
para escribir los carteles corres¬ 
pondientes al par ordenado que los 
de la forma binómica,en elcual ha¬ 
brá que introducir la T. Como el 
número complejo es un par orde¬ 
nado, tendremos que obtener los 


Figura 1 
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Tres casos particulares del programa 


-1 -2 4 


1 4 4 


[ 

1-2 5 

X Y 


X Y 


X Y 

—3 1 


—3 1 


-3 20 

-2 4 


-2 0 


-2 13 

“1 6 


-1 1 


-1 8 

0 4 


0 4 


0 5 

1 1 


1 9 


1 4 

2 -4 


2 16 


2 5 

3 -11 


3 25 


3 8 

EJE DE SIMETRÍAJB--1 


EJE DE SIMETRIA,S=-2 


EJE DE SIMETRIA,S= 1 

VERTICE,V={-1 ; 5) 


VERTICE,V=(-2 ; 0) 


VÉRTlCEy=( ; 4) 

LAS RAICES SON REALES Y 


LAS RAICES SON REALES Y 


LAS RAICES SON NUMEROS 

DISTINTAS 


COINCIDENTES 


COMPLEJOS CONJUGADOS 

XI =^-3,236 06 79 78 


XI —X2~— 2 


X1=( i ; 2) 

Xw= 1.236067978 




X2-( 1 ;-2) 

--- 


dos componentes que lo determi¬ 
nan, recurrimos a la fórmula y dis¬ 
tribuimos el denominador,quedará 

A1 5xA ^ ^A y para X2 

el segundo término será negativo, 
Observando esta fórmula vemos 
que el primer término es S y al se¬ 
gundo lo Ñamaremos SI, Ya tene¬ 
mos los dos componentes de cada 


una de las raíces. Af traducirlas al 
BASIC tendremos en cuenta nues¬ 
tro R negativo y usaremos de la 
función ASS para obtenerlo posi¬ 
tivo y luego hallar su raíz cuadrada. 
Definimos SI, 

260 S1 =SQR(ABS(R))/{2*A) 

Ahora sf podemos definir las rafees 
que serán números complejos con- 
jugados, teniendo en cuenta que 


nuestra TEXAS deberá imprimirlos 
pares ordenados, le tipeamos, 

270 PñiNT "XI =C’;S;T;S1 ;7’: 

"X2=r;S: n ;";-S1;T 

nos Imprimirá una raíz debajo de la 
otra. Hemos terminado nuestro pro* 
grama, llevamos un lazo ai fin, 

280 GOTO 210 

DURAN XARGAY DE GONZALEZ 
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LA COMPUTADORA EN LA ESCUELA 


Se presenta y plantea en estos mo¬ 
mentos el problema de fa capacita¬ 
ción. Aunque el Ministerio de Edu¬ 
cación y Justicia no ha dictado nin¬ 
guna norma en donde figure que 
deba incorporarse a la educación 
primaria y/o secundaria argentina, 
una asignatura llamada Computa¬ 
ción, ni asistida por computador, ni 
similar; se está estudiando: la forma, 
el cómo, el quién, el cuándo, ...y otros 
interrogantes, quizás todavía sin 
respuesta, para su i m pie mentación 
en el sistema educativo. 

Algunos establecimientos educa¬ 
cionales, por cierto muy aventaja¬ 
dos, han introducido en sus aulas a 
la computadora, como un nuevo re¬ 
curso didáctico. Si observamos la 
actuación de estos educandos fren¬ 
te a este nuevo elemento de la so¬ 
ciedad actual, a grandes rasgos se 
pueden describir tres etapas: Jardín 
de Infantes, Ciclo Primario y Ciclo 
Secundario. Independientemente 
del lenguaje que use el alumno para 
comunicarse con la computadora, 


en e! Jardín de Infantes el pequeño 
te n d rá su p r¡ me r con tacto con e! I a, le 
tomará confianza y la aceptará como 
algo nuevo en su mundo; aprenderá 
a querer la, cu id arla y respetarla, mas 
la mirarán y admirarán de lo que le 
pedirán, pero todo esto será real y 
surtirá efecto, en la medida en que el 
pequeñito de la familia lo logre ju¬ 
gando con la computadora. Ya cur¬ 
sando ef Ciclo Primario el niño la 
tratará como a un buen amigo, pero 
no desinteresadamente, porque le 
ofrecerá y enseñará lo que él sabe, 
pero siempre le exigirá las solucio¬ 
nes mágicas. Sus progamas serán 
cortos para obtener respuestas rá¬ 
pidas. Este niño está aprendiendo, 
"sé ordenado y cauteloso” le está 
diciendo en todo momento su buen 
amigo. Llegamos al Ciclo Secunda¬ 
rio, frente nuestro tenemos un ado¬ 
lescente ávido de nuevos conoci¬ 
mientos y por sobre todo creativo, 
habrá que encausarlo y aprovechar 
al máximo estas facílidadesquenos 
ofrecen los alumnos. En este punto 
ya podemos afirmar que ellos esta¬ 


rán educando a la computadora. 
En cualquiera de las tres etapas h 
considerando los distintos niveles 
de madurez del educando, podemos 
decir que de una u otra manera 
estarán programando a la computa¬ 
dora. Este alumno que intenta pro¬ 
gramar su computadora, es decir 
explicarle cómo se resuelve cierto 
problema, deberá enfocar la solu¬ 
ción como un proceso descendente 
de descomposición de acciones^en 
otras cada vez más elementales, 
hasta deducir un diagrama en térmi¬ 
nos de las acciones básicas que 
pu eda efectúa r la computadora. Aq u í 
el ordenador educará al alumno: le 
exigirá que le dé instrucciones, que 
conozca el significado y posibilidad 
de cada instrucción y que éstas es¬ 
tén dadas en un riguroso orden; 
mientras el alumno ha tenido que 
realizar esto ha elaborado fa parte 
conceptual del problema y su opera¬ 
toria En este proceso, por sobre 
todo, el alumno está desarrollando 
su razonamiento lógico. 

DURAN XARGAY DE GONZALEZ 




































ti U IV D 





CENTRO DE EDUCACION INFORMATICA 
del CLUB DE USUARIOS de la TI99 


CURSOS ACTIVOS Di COMPUTACION 

BASIC, LOGO y ASSEMBLER Niveles I, II y III 
Para adultos, jóvenes y niños 

m GRATUITO HE LAS- COMPUTADORAS FUERA DEL HORARIO DEL CURSQ 
PUEYRftEDGN fl&Q PISO 9 - TE.í 86 - 6430 / 39-4669 


■■w genial 

microsoft club 
microcomputadoras 

cursos ~ 

Gal Cómela Loe. 17. Punta Alta.Prov. Bs. As. Inscripción 17 a 20 lis. 


Usted y una computadora 


En Rosario cursos 
especializados de 


Basic - Logo 
Commodore, Spectrum 

Cornpuícsí!o , riQ»l - 3 
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FAST LOAD 

VERSION 2.0 

NUEVA VERSION 
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DISTRIBUIDORES 

LATÍN DATA TK85 - TK90 ■ TK200Q ■ 2X 
SPECTRUM - TIMEX 2068 ACOUSTECH 
(GRABADORES) - PELIKAN (CINTAS) VISICOMP 
(MONITORES) - OREAN COMMODORE 
IMPRESORAS - TEXTOS Y REVISTAS 
DISQUETTES: MAXELL -DATA UFE- FUYl> -SKC 
CASSETTES DE JUEGOS PARA; TK 90 TK 85 
SPECTRUM TC 2068 COMMODORE - TK 2000 


ACCESORIOS’ FUNDAS PARA 
COMPUTADORAS - INTERFACE DE GRABADOR 
PARA C64 -(CON Y SIN CONTROL REMOTO / * 
CODIFICADORES DE SEÑAL PARA 
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RESET PARA COMMODORE - INTERFACE DE 
YOYSTICK PARA SPECTRUM 
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BATALLA SUBMARINA 



COMP.: TI99/4A 
CLAS.: UTI 





Ef juego consiste en hundir tantos 
barcos como se pueda, disparan¬ 
do los torpedos provistos, antes 
que se acabe el combustible y ade¬ 
más esquivando las peligrosas bom¬ 
bas de profundidad. 
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Porque Ja mejor computadora no puede solucionar el menor de 
sus problemas sin el SOFTWARE adecuado. 

Para todas las necesidades, disponemos de la mejor biblioteca en 
SOFTWARE y del mejor equipo profesional en SISTEMAS. 
Plantéenos su inquietud y estudiaremos cuál es el software que 
necesita* RECIEN; LE OFRECEREMOS LA MEJOR 
COMPUTADORA *,, 



HARDWARE: 


COMMODQRE 64 - DRIVE 1541 * DATASETE - IMPRESORA 

TK 90X/85/3000 - DRIVE - ALPHACOM 32 - CZ 2000/1500/1000 - ACCESORIOS 

TE LE VIDEO SYSTEMS - STAR GEMINI 


ACCESORIOS; JOYSTICKS - INTER FACE GRABADOR CRM 64 - ORIVES - MODEMS ZX FILTER 

MONITORES FOSFORO VERDE - INTERFACE KEMPSTON JOYSTICK 
CONVERSION 2068 a SPECTRUM - ESTABILIZADORES ELECTRONICOS DE 
TENSION - FUNDAS V1N PLUS 


SOFTWARE; 


INSUMOS; 


LOS JUEGOS DEL PIRATA - CYDERNE - MICROSOFT * CZERWENY - Juegos y 
Educativos en Castellano 

Nuevos títulos Spectrum: * CONTEXT 64 (procesador de textos) 

• S1T1 64 (base de datos) 

• STOCK 64 (control de stocks) 

• MORSE (transmisión/recepción) 

• CURSO Lenguaje Máquina 

• SINTETIZADQR de Voz 

• COPY RS 232 

- DISKETES: XÍDEX BASF - MAXELL 
■ FORMULARIOS CONTINUOS (diseños especíales) 

-ETIQUETAS AUTO ADHE SI VAS 


—SER VICIO TECNICO— 


PERSONAL COMPUTER CLUB ARGENTINO 
—C.C. 538 - 1900 LA PLATA— 


mej° T a ?°'° 

a\ usuario— 



8 763 L, 13 

1900 LA PLATA 
TE*: 021-2J 3441 
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Ahora bien, luego de este rato emo- 
cionante, buen rato si el programa 
es largo, vemos que no lo podemos 
listar para hacer una copia de se¬ 
guridad o buscar en su interior a la 
espera de nuevos secretos, por* 
que el programa no devuelve el 
control al BASIC nunca, entonces 
experimentamos otra nueva emo¬ 
ción: La desilusión. 

Para evitar este último paso les 
mandamos este truco que hará 
que nuestro programa se cargue 
pero no se ejecute, a pesar de te¬ 
ner arranque automático. 

El comando RAND USR 837 e$ 
una llamada a Ja rutina de carga de 
la ROM, Accediendo a esta rutina, 
se impide la autoejecución y así se 
tiene tota! acceso aL listado, 

Los pasos a seguir son 3: 

1) Poner modo FAST (importante]). 

2) Teclear RAND USR 837 y luego 
ENTER. La máqu ina está ahora en 


CZ tOOO/t 500 TK 33/65 

RQMTEST 1 K 

Esta es una rutina de comproba¬ 
ción de la ROM, Invierte aprox. 1 
minuto en ejecutarse y comprue¬ 
ba si existe una falla en algún bit. 
10 FAST 
20 LEÍ A = O 
30 POR B — O TQ 8191 
40 LET A = A + PEEK B 
50 NEXT B 
60 PRINT A 

Al finalizar la comprobación debe 
dar 855106, que es la cantidad de 
bytes de la ROM. 

Los programas de RAMTEST para 
2 y 16 K están en Trucos, Trampas 
y Hallazgos de K-64 numero 2. 

BREAK UP 

Todos nosotros, a! cargar por pri¬ 


mera vez un programa,experimen¬ 
tamos una serie de angustias y eu- 
fori as d e índ o I es d i ve rsa s. An g ust i a 
por eJ miedo que tenemos a de¬ 
tectar un sistemcrash en cualquier 
momento de la carga y euforia al 
ver que el programa en cuestión 
cargó sin problemas. Sabido es 
que esto ú I timo pu e de t ra n sfo rm ar- 
se en toda una aventura con cierto 
tipo de programas. 


modo LOAD. 

3) Poner en marcha el grabador y 
cargar el programa normalmente. 
Si al terminar La carga aparece un 
código de error no asustarse que 
es normal. Finalizada la carga te¬ 
clear LIST y el listado aparecerá 
sólito. 

Pero “Hecha la ley hecha la tram¬ 
pa 1 ' reza el refrán,.. Y sí existe tam¬ 
bién un método de seguir teniendo 


protegidos los programas. Por ejem- 
I pío en el siguiente: 

! 100 FAST 

l 110 LET D = PEEK 16396 
I 120 POKE 16396,0 
130SAVE ,l PRIV” 

¡ 140 POKE 16396.D 
15GSLOW 

Este programa se grabará a sí mis¬ 
mo pero con eL archivo de pantalla 
desarreglado, por !a instrucción 120. 
Si se intenta luego cargarlo con el 
RAND USR 837, se producirá el 
sistem crash,. dado que es nece- 
sario que la ejecución automáti¬ 
ca se realice para arreglar el archi¬ 
vo de pantalla, cosa que hace la lí¬ 
nea 140. 

Números en pantalla: 

Una de las líneas que más tiempo 
haceperderalZX-81 es la impresión 
en pantalla de números. Para pro¬ 
gramas matemáticos con núme¬ 
ros decimales, no queda otra que 
imprimirlos como manda el BASIC, 
esto es: PRJNT "número", pero en 
otros casos como los juegos, por 
ejemplo o programas sencillos, 
existe una alternativa, 

Como sabemos el computador tra¬ 
baja mejor con cadenas que con 
números, entonces transformemos 
I los números en cadenas. 

Por ejemplo, para representar a 
bastante velocidad el valor de una 
variable N, tenemos: 

PRINT CHR$ (28 + INT (N/10)); 
CHRS (28 + N - 10 * i NT (N/10)) 
Es a primera vista más complica¬ 
do, pero más rápido de ejecutar. La 
limitación es que N debe estar en¬ 
tre cero y 99, 

Para números redondos entre 0 y 
990 agregaremos al final: ”:" 0 15IJ , 
Para números entre 0 y 999 la cosa 
se complica: 

LET XI = INI (X/100) 

LET X2 = INT ((X - 100* XI)/10) 
PRINT CHRS (28 + XI); CHRS (28 
+ X2); CHR$ (28 + X — 100 * XI - 
10* X2» 

Podemos representar los números 
en modo inverso cambiando el nu¬ 
mero 28 por 156. 

Para comprobar la efectividad de 
ambos programas, podemos gene¬ 
rar bucles FOR/TSl EXT, entre 0 y el 
valor máximo de cada línea. 

DESCONECTANDO LA RAM 

Hay algunos programas que deben 
ser corridos con 1 Kde memoria, si 
disponemos de la expansión pode¬ 
mos también tener 1 K solamente 
entrando POKE 16398,68. 

Este comando coloca el RAMTÜP 
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igual que en una máquina con 1 Ky 
funcionará como tal 
Las proponemos desde esta sec¬ 
ción ex peni mentar con distintos va¬ 
lores de este POKE 16389 para 
fraccionar la memoria a gusto y 
averiguar cuáles son los intervalos 
de memoria más chicos en que 
ésta puede ser seccionada. 

Les recordamos que para saber 
cuánta memoria libre tenemos te¬ 
clear PR1NT PEEK 16388 4- 256 * 
PEEK 16389. 


CZ 2QOO/TK 9QX/SPECTRUM 

TIEMPO 

A veces nos resulta útil saber el 
tiempo que se tarda en pulsar una 
tecla. Para averiguarlo podemos 
usar este truco que introducire¬ 
mos en el lugar del programa que 
se espere pulsar una tecla: 

LEI í - 7997 - USR 7997: LET 
tiempo = t/60 

Esta sentencia ejecuta primero un 
salto a la ROM del Spectrum en la 
dirección 7997, donde se ejecuta 
la función de BASIC PAUSE. En 
ROM hay un registro contador de 
tiempo el par BC, que se decre- 
menta desde 7997 a 0, hasta que 


se pulsa la tecla, y una vez pulsada 
retorna el control al BASIC el con¬ 
tenido de este registro. Luego la 
instrucción BASIC resta este valor 
d e 7997 y asig na la varia ble t a est e 
numero que r dividido por 60 nos da 
el tiempo en segundos. 

IMPRESION 

Un truco muy útil para el Spectrum 
es el siguiente: 

POKE 23578,16. Esta instrucción 
hará que todas las sentencias 


PR1NT $e transformen en LPRINT, 
es decir que en vez de salir por 
pantalla, saldrán por impresora. Es¬ 
to es de mucha utilidad ya que nos 
permite seleccionar entre dos pe¬ 
riféricos de salida con sólo una ins¬ 
trucción POKE. Para restituir la sa¬ 
lida de datos a la pantalla teclear 
POKE 23578,6 que es la instruc¬ 
ción contraria a ia anterior. 

MAYUSCULAS 

La instrucción POKE 23658,8 co¬ 
loca automáticamente en modo 
mayúsculas desde el programa, sin 
tener que realizar Caps Lock. Ha¬ 
ciendo POKE 23658,0 restituimos 
al modo minúsculas. 



SIMULACION DE 
FRINT AT 

El número actual de líneas (0-24) 
está almacenado en la posición de 
memoria 214. Utilizando estos dos 
registros, podemos poner el cur¬ 
sor en cualquier parte de la panta¬ 
lla muy fácilmente. La columna se 
pone con POKE 211, No.de colum¬ 
na y la línea con POKE 214, No. de 
línea. Pero esto no es suficiente. El 
sistema operativo no sabe todavía 
que el cursor debe ser movido. 
Pero hay una rutina en ROM que 
hace este trabajo. Podemos lla¬ 
marla con SYS56732. En resumen, 
ia secuencia de teclas será: POKE 
211, columna : POKE 2 14, línea : 
SYS 58732 

RECUPERACION 

Luego de una Interrupción de pro- 
grama o de u n error, eI computador 
indica en qué línea se paró el pro¬ 
grama. Si en ese momento borra¬ 
mos por descuido la pantalla, per¬ 
deremos esa valiosa información, a 
menudo imprescindible. Las direc¬ 
ciones de memoria 59 y 60 nos so¬ 
lucionarán el problema. 

Haciendo PRINT PEEK (59) + 256 
* PEEK (60) recuperaremos 'a In¬ 
formación perdida. 




I MhílMilít' f(lf 

^cornmodore 

' CQMPUTERS 


¿Quién tiene los mejores 
programas en Cassettes para 

commodore 64 

micro computo 

ACOYTE 44 - LOCAL 6 CABALLITO 




m 


Pág.3í 









































































Et programa que presentamos no 
es en realidad un juego, por lo 
menos no hay que tener rapidez, ni 
tampoco se gana o se pierde, pero 


puede resultar muy interesante ar¬ 
tísticamente y científicamente. 

El juego fue inventado por John 
Horton Conway, un matemático 


norteamericano y comentado ex¬ 
tensamente en la columna de jue¬ 
gos matemáticos de "Scientific 
American” de octubre dei 70 y fe- 


El patinador 



Historia de un organismo tetratómico 


WWWlP|||l l l||l|fif 


Generación 0 12 



brero del 71; y fue publicado un 
programa para jugarlo,en Fa revista 
"Commodore Microcomputers”. 
Aquí publicamos una versión más 
rápida, agregándole algunas par¬ 
tes en lenguaje de máquina. 

El juego simula el desarrollo de 
unos organismos en la pantalla. 
Desde un dibujo original que no¬ 
sotros ingresamos en la pantalla Fo 
veremos evolucionar hasta morir o 
cambiar de formas caprichosas in¬ 
definidamente. 

El universo de estos bichos lo po¬ 
demos imaginar como un tablero 
cuadriculado. Los componentes 
fundamentales de los bichos son 
fichas (llamémosle átomos) que 
ocupan los casilleros (como fichas 
negras en un tablero de damas). 
Cada casillero puede estar ocupa¬ 
do o vacío y puede cambiar su es* 
tado en la siguiente generación de 
acuerdo a 3 leyes muy simples. 

1) Un átomo que tiene £ ó 3 veci¬ 
nos sobrevive. 

2) Un átomo que tiene 1 vecino o 
no tiene ninguno muere de sole¬ 
dad y uno con 4 ó más vecinos 
muere asfixiado por sobre pobla¬ 
ción. 

3) En un casillero vacío con exacta¬ 
mente 3 vecinos nace un átomo. 
Es muy difícil imaginarse como pue¬ 
de cambiar una figura al cabo de 
varias pasadas o generaciones. En 
una figura mostramos como evo¬ 
lucionan algunos tripletes ató mi 
eos. 

Los organismos teíra-atómicos son 
más interesantes, destacándose el 
de !a segunda figura. 
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Una gran t, X 15 puede deparar sor¬ 
presas, pruébenla. Otros objetos 
Interesantes son los patinadores 
penta-ató micos que se desplazan 
por la pantalla con la secuencia 
mostrada en la ilustración siendo 
una idea interesante poner uno en 
cada punta de la pantalla y hacer¬ 
los chocar. 

Una vez ingresado el programa re- 
visado bien y grabarlo en cassette 
o d isco pu esto q u e co m o tiene pa r- 
tes en lenguaje de máquina, si es¬ 
tas tienen errores se puede ‘'col¬ 
gar” la máquina y habrá que entrar 
el programa de nuevo en caso de 
no haberlo salvado. 

Para ingresar el dibujo original lo 
hacemos con las teclas de cursor 
para pos i clonamos en la pantalla, 
,J * 5f para poner un átomo, “(espacio) 1 ’ 
para borrarlo y “(retum)' 1 para co^ 
menzar fas pasadas. 

Cualquier descubrimiento intere¬ 
sante, teorías sobre la evolución de 
los bichos o universos con otras 
“leyes” que presenten caracterís¬ 
ticas interesantes escríbanme a 
K64, 

Marcelo Oscar Martines 


1 S.EN +****+*+***•***++■*** 

2 REN, * V] lIJi * 

J SEN 1 NQPIF POR K.O-K. * 

4 SEN - PARA J¡64 v 

5 RLk *******+****•******* + 

Ifi W - 5 i 9 S B = C- 1 ^ ?9 & ■: FORT 532B0 ,Q iPOSF 52£9] , Ü 

2& FDR K-49152 TQ 4&33í[READ ÍIüPÜKE K.NrNEJCT |f 

3C POR K-0 TO 999:POKÉ 1D24+K r 9l3POKE C + K ,0 : NEKTiCC- 1 rft-0 rS-0 

4£ (Jet rílif aS-"* thek a=fbj:k t£-*|í í ;pgKEC+K ,NOTí* amd- íi and {a 0r H 

SO IF A5*-CHP5 I4ZJ TNEN S-l: D-l íGOEOB 15D 

6G IF AS -CiLPS 113) THCn PÚ«E OH,£:M TO 2LO 

75 lí AS.iCHRS|2?l THFN P=1;G0S1ÍB 150 

SO XF BÍ-CHPÍ 116^(■ 7WEÍJ B—l ¡"W5V0 lid 

§5 IF AS -CÍTP.S 117J TUÉN D-45:COSEEf 153 

IDO 1 F AS-CHK?(145) THtiR U--40 ¡fiOSlíB 150 

JlQ ] F A$-iCHTÍ$ (3Í | TH&fl 5-0; Dil ¡$35UE 153 

íag m to so 

150 POHE C + B,£ clí™K + &r IF KJ99Í OS. K<0 THEN K>K-B 
160 S = PFT:K I.C + K) ; RETO RN 

210 5Y3 -4 9 2 5 &;CC-CC* 1 ■; EF COLA THES CC-1 
223 3YS49152 

2 70 TQK 1-1 TO 23]M-CH 1-11 *40 
2&J PL=W+ E é 42-»l 

2&0 P2-IPT ÍF1/2Í6» íKHÍE 252,PJ 
303 P3-P1-P2* 256 :PO£E 251,P3 
313 P2= tCÍT (H/25-fi I j FOKE 254,P2 
323 ?3=M-PJ*I5EjPOKE 253,Pl 
330. KJlíE 350 r CC 
343 SVS 49266 
353 BEST ! 

355 &E=í^-t 
363 CO TO 210 

1030 DATA 169,39,113,253,169,3,133,254,169,216 
1010 DATA 131,255,1C9j 0,141,3C,192,169,203,141 
1020 DATA 37 r l?2 r L60 r 3,177,J54,41,15,245,11 
1030 DATA 160,7,L90,93,192,254,17,17,136,16 
1040 DATA 247,233,36,192,206,3,236,37,132,199 
1050 PATA 252.16,19.169,34,131,253,24,173,36 
1063 D-ATA l92,l3S r S r l4l r 36,l9í,144j3j23SjJ7 
1070 DATA 152,230,254,203,2,233,255,166,2^4,201 
10B0 DATA 232,209,195,165,255,201,219,206,169,96 
1090 DATA 0,1,2,42,44,94,65,96 

1100 DATA 169,3M,l»,252,169,0,133,251,IGOrOrl&s,351,201,109,205,7,165 
L1L3 DATA 252,201,207,200,1,36,169,0,145,251,230,251,236,235,230,352,76,109,JOS 
1120 DATA 162,0,160,0,177,251,201,2,200,2,242,14,201,3,236,6,165,253,145 
1130 DATA 25i.309,4,169,0,145,253,232,234,39.240,14,233,251,236,2,230,232 
11-13 DATA 230,253,206,219,233,254,205,215,96 


micracnm 
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Spectrum CZ 2000 

La computadora más vendida del mundo 
SERVICE - PROGRAMAS - CASSETTES ■ JOYSTICKS 


Gata miza 

C Z SOCO 

A 

335,20 

CZERWENY 

SQJNDBOX 

A 

A 

36,50 

ISftW 

ELECTRONICA 

OFERTA 

A 

335 , ■ 


BDR S.R.L. 


AV. BELGRADO 3264 
( 1210 ) CAP. FED, 
TEL, & 9-6672/6906 



MANIAC 


CASSETTE EN VELOCIDAD 
LENTA PARA C-64 


BASTA DE PROBLEMAS!!! 

Casa especializada en venta de 
Microcomputadores TODAS 
LAS MARCAS. Accesorios y software 
para los mismos. 


Rlvadavla 1 3734 Ramos Mejía (1 70 - 4 ) T«L: € 54-6344 


- 

I» 




NOVEDAD 


' íi+rí 4í.x’-r «i e '.uj i^u ■v.ví.v ,'hf k |hb 

¡ '-Hr-sr,,- r.. . \ 1 _, — n jpimo | n lCLÍ ^11 1 'NjTj Rl 

¡* Verdadero sonido para su 

. i 1 ! ELECTR 

ü^y^g^pir | , ._ r3tí>r i^ Electrónicos | 

SPECTRUM TS 2068 


“SOUND BOX” 

CONVERSION PAL‘N 

MAGIC LOAOER: Solución para problemas 

de carga 

VIDEO MAGIC: Mejora la resolución en video 

INTER FACE PARA GRABADOR C/64 

CON REMOTO 

-NUEVA DIRECCION;- 

Vf ANION TE 1454 2 a P. “K + ' 3° Cuerpo - TE: 40-1 1 BÉ 

Amplificador de sonido 

; Salida a parlante externo 

RESET 

Lcd indicador de funcionamiento 

Fabrica y Distribuye 

COMPUMEP S.A. 

Belgrano 3282 P.B. l A"C.P. 1210 TcL 85-M72rtjm 

i:\ ! vios a í mEklók -— 
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ÍIQÍ* 

G; 

Símbolo de! múltiplo 
equivalente a 
1,000.000.000'- Por 
ejemplo. 1 GB equivale a 
decir 1.000 MES á 
1.000.000 KB ó 
1.000.000.000 bytes. 
HALT 

INSTRUCTION: 

Instrucción en 
assembler que le indica 
aí CPU que se detenga 
en la ejecución de un 
programa. Normalmente 
permanecerá así hasta 
que se reinicie su 
funcionamiento por 
medio de una acción 
manual del operador. 
HANDSHAKING: 
{apretón de manos) 
Ordenes de control 
utilizadas para la 
sincronización en ei 
envío e intercambio de 
datos entre dos 


Su uso asegura la 
sincronización de las 
comunicaciones. 

HARÉ COPY: 

Se refiere a una copia 
sólida de información 
gráfica mostrada 
previamente en pantalla. 
Normalmente se refiere 
a la copia en papel por 
medio de una impresora, 
de un listado de 
programa un texto o un 
dibujo, 

HARD SECTORING: 

Método de marcar en un 
floppy disk la ubicación 
de los sectores por 
medio de unos pequeños 
agujeros. 

HARDWARE: 

Todo elemento físico o 
grupo de ellos que 
conforman un ordenador 
o un sistema de 
computación o sus 
periféricos.. 
HEURISTIC: 

Método de “trial and 
error' 1 (prueba y error) 


búsqueda de soluciones 
ante un problema dado. 
Aunque no siempre se 
obtienen resultados 
pueden lograrse otras 
veces soluciones más 
rápidas. Utilizado en 
métodos de 
investigación de 
Inteligencia Artificial. 
HEADER: 
(Encabezamiento) 
Secuencia de bytes de 
información referente a! 
programa o mensaje que 
le sigue a continuación. 
Algunos programas para 
evitar ser pirateados son 
modificados para 
quitarle ese 
encabezamiento 
(headerless). 

HEXADECIM AL 
NUMBERING 
SYSTEM: 

Sistema de numeración 
de base 16, que contiene 
Jos dígitos 0 al 9 y luego 
de la A a la F. Se usa 
frecuentemente por 


I I U ■ II U I b hJ U<i_r 

microcomput adoras ya 
que se facilita mucho el 
manejo de los números 
binarios de cuatro 
dígitos, 

HIGH LEVEL 

LANGUAGE: 

Lenguaje de 
programación que 
permite al usuario 
programar a la 
computadora de una 
manera más 
conveniente, entendióle 
y efectiva (por lo menos 
desde el punto de vista 
del hombre), que con un 
lenguaje de máquina. 
Generalmente estos 
lenguajes utilizan una 
estructura de sintaxis 
que le permite a la 
computadora traducir 
estas simples órdenes 
en una serie complicada 
de operaciones de bajo 
nivel o código de 
máquina. 

Entre éstos están el 
BASIC, LOGO, COBOL, 

| PASCAL, FORTH, etc. 



INFORMATICA S.A. 



COMPUTACION Y SISTEMAS 


( 


COMPUTADORAS y PERIFERICOS 

MICRODIGITAL TK 85 ■ TK 90 ■ TK 2000 
COMMODORE 64- TEXAS TI 99/4A 


PROGRAMAS 

, _ _ _ 

En cassettes y disquettes 
Amplio surtido en juegos y utilitarios 
LOGO en CASTELLANO en cassette 
Completa Bibliografía 

Service técnico, 

joysticks, interfases, resets y accesorios 
Fundas de protección 


VENTAS 

POR MAYOR Y MENOR 

Envíos at Interior dei País 


Junín 969 7*4 

- 1113- Buenos 4/res 

821-1824 

Av. Las Mera s 381 0 

* 1425 - Buenos Aires 

801-0996 
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CO M P UTAC ION PARA TODOS 


RESET - COMPUTADORAS • CASETTES - BECAS 
AURICULARES - CALCULADORAS 


SELECCION 

II CONCURSO TRIMESTRAL 


SORTEAMOS SO PREMIOS 


PREMIOS: RESET 

Juan Rlííz [TuCumánl 1 

Miguel Gazzueta. (San Isidro) 

José Czerwinski (Beri&so) 

PREMIOS: AURICULAR 

Olago Coronel ¡Neuqu vn; 

Fernando Güín m a ¡Mar dsl Fíala) 


Oaniel H. Díaz 
Ernesto Galeano 
Eduardo Mombello 
José Vidal 
Federico Médano 
Jorge GioeCChlni 
Adrián Rugflerl 
Alfredo Segura 


(Lanüs Esis) 
(Capital) 
(Capital) 
Capital) 

(La Plata) 
(Moreno) 
(Avellaneda) 
(Capilai) 



PREMIOS: CASETTES 


Luis Acosta 
Manuel Ldpez 
Carlas Eidmer 
Gabriela Ruellan 
Jorge A. Montenegro 
Exequial Gdmez 
Rodolto Nave 
Ricardo Villa 


(Capital) 

[Vina Manaili) 
(Capital) 

(La Piala) 
(Capital) 
(Capital! 
(Santa Fe) 
|Fior>dá] 


PREMIOS: CALCULADORA 
AURORA 

Andrés Pellegrlno (Tamperléy) 

Eduardo Balskus (Gen nal) 

PREMIOS: CASETTES 
A ELECCION 

Gustavo Burgo & (Sgo. de! Esteré) 

Fabio Doloe (Capital) 

Miguel Pizarra (Gá-vezj 

PREMIOS: SECAS 

CURSOS EN EPI 

Daniel Epflftín (Capital) 

Gu I Mermo J&m i ti i (Lomas dal Mi rador) 


Juan Trepa ni 
Juan Cassain 
Fernando Ifion 
Héctor Ctiieppéro 
Martelo Tro pie 
Jorge Marello 
Eduardo Yáñez 
Gonzalo P. Lastra 
Liliana Seine 
Ricardo Lacour 
Gerardo Cuccioletti 
Daniel Me mes 
Fernando Cásele 
Andrés Ben lt.&2 
Marcelo Andrés Medina 
Marcelo Grimoldt 
Ricardo Lucero 


(Capital i 
(Capital) 

(San Nicolás) 
(Paraná) 
(Clavar ría) 

(Wi ;de) 

[Capital | 

(Florida) 

(Córdoba) 

(Ciudad Evita) 

(Florida) 

(Córdoba) 

(Ramos Me¡ía) 

(Villa Soseb) 

(Capital) 

(Capital) 

(Córdoba) 


Germán Huber 
Gustavo Haag 
Héctor Sénthei 
Leonardo Terrena 
Gustavo Persak 


(Santa Fa) 
(Valentín Aléiná) 
(Neuqeén) 
(Córdoba) 
(Capital | 


Los premios podrán retirarse en la 
Administración de K 64, Ce ruto 
1320, piso 1°, Capital con docu¬ 
mentos de identidad, en el horario: 
10a 12 y 15a 17 horas. 

Quienes viven en el interior del 
país, pueden solicitar que se les 
remitan ios premios por correo. 


SUSCRIPTORES 

GANA DOR DEL MES, SORTEO C Z 1000 

I ANTONIO ZAMPARDI I 

SAN FERNANDO - PCIA. BS. AS. | 

FELICITACIONES 

DEBERAS RETIRARLA EN NUESTRAS OFICINAS CON LA PRESENTACION DEL DOC DE IDEN 


i ■ ■ ■ ■ 


SORTEO ENCUESTA: GANADORES DEL MES 


Premio» : BECAS CURSO BASIC 


Carlos Musto 

(Capital) 

Roberto Brandan 

(Villa Ballester) 

Héctor Man silla 

(Avellaneda) 

Agustín Barbeta 

(San Isidro) 

Rodolfo del Fino 

(Rosario) 

Marcos Milohonitti 

(Villa Regina) 

Gustavo Alberto Arena 

(Caseros) 

Carlos P#r«yra 

(San Nicolás) 

Osvaldo J. Orella 

(ttuiacngó) 

César L, Camps 

(Berazstegui) 

Estaban Fteslor 

(Concordia) 

Femando Del pana 

(Quilmas) 

Antonio Pryzinatuk 

(Merlo) 

Plago Simunovlch 

(Arapuilo) 

Reblo Fernández 

{Cepita!) 

Lula A. Acosta 

(Capital) 

Erna ato fcazán 

(Mendoza) 

Matías Fernández 

(Capital) 

Patríelo Barran es 

(Temperley) 

José L. Verrastro 

(Corrientea) 

Daniel García 

(J.L. Juárez) 

Susana Hernández 

(Ctudadela) 

Ma. i. Garda Flguaroa 

(Capital) 

José Rueda 

(Rosa rio) 

Alicia Tealdl Blanco 

(Gastéis r) 

Gua Iberio Mosca 

(Bolívar) 

Jorge EmUlant 

(Córdoba) 

Dan* Searpa 

(Capital) 

Leonardo Comea Bo 

(Córdoba) 

Majdm lile no Antoraz 

(Tucumán) 

Premios: CASETTE 

Arnaido Palaarl 

(Córdoba) 

Daniel i - una 

(Trelew) 


Andrea C. del Ponte 

(Rosario) 

Emiliano Hossl 

(Bigand) 

Carlos MarcHottt 

(Mercedes.) 

Julio Armando 

(Pió. Madryn) 

Rafael Alvar*! 

(Viedma) 

Juan J. Braufi 

(Chata r i) 

Javier Balumbo 

(Lincoln) 

Edgardo Lazarte 

(Tortuguitas) 

Natalio Kresbov 

(TucurTián) 

plago Siocardl 

(Capital) 

Alberto Feirne 

(Fio. Piray) 

Alina Rodríguez 

(Mar del Plata) 

Julián Valetta 

(Cenital) 

Hugo Cangas 

(Villa Mazal 

Sergio Giménez Rossl 

(Córdoba.) 

Ricardo Ramos 

(Capital) 



César Ara ruda 

CGuaymalléni) 

Marcelo Meseei 

íBurzaoo) 




Los pre lisios podrá n re (i rarse en la Adm ¡ni St ración de K6 J.Cedrito 13201*, Cepita I. po n doc u mentbs de identidad, en e I h e rario dé 10 a 
12 y 15 a 17 ha. Quienes viven en el Menor del país, pueden solicitar dué sé lea remHan ios premios por correo 


















































FUGUE 



COMP: COMMODORE 
OLAS: ENT 


Con este programa podremos es¬ 
cuchar una hermosa fuga.e iremos 
conociendo et modo de hacer m ú- 
sica con tu Gommodore. 



Í6 OO£.'£JÍÍ0 

¡oe- p-:- z5-i;?o ■: 

y . e - f .‘í;e 54-¿r;, í 

¡28 ?Hi==4ise-.í p;-¡:t;4.-.r9 ■;■ 

J^ES P£¡kE5429é, : S 

i-i? REKWSJ-B ÍÍM 

1=8 REKUA- í. t. í.c. F 

¡68 :?fi— I THE„5E2 

ne> PD«E 5-4273 ,9 PWÉ54£72-B 

(00 PÜ-£ 5C2S0.C PXES+Í7?.: 

¡93 P0*E 54287, E P?*£54£96,F 
2í? fíí¡*íT 053 KS>:r 
i[t PCTüLíig 

500: FfiKE^ae?,? PQHEÍ412Í.Í- 

5i0 PO<E5ii273,0 3 

52e po*£54íee,0 “íiKssííí^re 

53Í PDME54Í96, 15 

540 FÍ5k-LTQL500.HF2T 

530 FD-.E55Í. ¡3- PSKEfiji, 1? PDKE L;-í i 

Ír0 PRlH^ 'TMfiU 1 !^' ""HZ 4 

1003 3*™ ás. 177.0. ero'ííiSí 177.0.J 0-0.25. 177.0 0.0.0,25, 177 2,0,0. H 
I?'? 3 *tr gg. ií6.fl.0,e.0,gg, i26,0,í.0.í r ?e u«.e,?,e. d-síe, em¡. 0,3,0.0 
1020 JWTfl 30,14 ¡, 8,0,0,?, 30, 14l,,0, 8.0,0,3í, Ul.í. 0,3. 8,33, Hl, 2.8,0 t 
1030 »TA 30, 0,0. 8,38, 541,0. 0,3-3 29,214,0,0,0. 8,»,21-¡.2,0,0.0 

16+0 S*TA 23,177,0. 0,0.8,25,177,0, 8,0,0,36.1^,G. 3,0 8,30,1.4: ? 3,0 0 
105? DBTR 20,114,0.8,0,8,29,214,0.-3,0.0, £3. L77.0,8,0.8,E$, (??.*,*,*.0 
106-2 DfllTH ¿4.63.7.0-7 0, J4 ■ 03 .0, 0.0, 0, 20, 2 H 0 ■ ?, 0, 8.23,2] 4,0.8,0, 0 
1070 DSTr jS,fi3,0.C 0 0, 35,¿3.8,0,3,0, :3,5?,8,0,0,í, 19,£*,8,0,9,0 
100a £fi T A 13,177,8.2,8,8,23, ¡77,8,0,8,0,1S.S3-3,0,0,0,19,a3,0 0,0.0 
5030 LATA 28,2:4,0.0,0,0.28,214.0,0.0,0,19,Í3je,0,8 0,19,(3,0.8,0,0 
I [00 MT* 30, 341,0,0.0,0,30,145,3. S),8,0,28 j£ 1*,0,?. 0,0 25 ¡77,0.3.0.0 
3 Lie £STP M,2L4,f ,0.0,0.20. 214.e,0.0, 0,19,0.0,6.0.?, 13,S?,0.3.0,a 
i 120 XWTP 25,177, 0,0.1,0-25. L77.ff r f,0. ?, 19,65.0,í,S,0,2l, L?7, í.8,B,a 
¡130 TATA 28,214,0,0.?.,0,M.214.0,e,0.0,19,63.?.í,B,0,50,214,í 8,0.0 
¡ 140 TfiTfl 38,. L 41.8,0.2,0.30, 14L .0,3,0.e .58.214, t,8.i-,C-23.177,0.2. 0,0 
1L34 CATA 28,214.0,0,9,8,19,63, 8, 8,8,8,00,126,0.0,0, 8, 34 , 75, 8,0, 9r 0 
1L60 CATA 32,141.0,0.2 8.2S 214,0.0.0, 0,25,177 0.?. 0,0.00.141.-8.0. 0,0 
5170 EflTR H,2H. f,-S-ffí-;;. 177,0,0,0. -5-54,63.0. B,í.0.z£,2Í4,É 6,0.8 
¡188 Cflr.» 53, ¡7?,0,0.? 0,¡3 ^3 7,0,0,0,55,177,8,0,0.5-,58,214, 2,C,0. £. 

1130 CflTffi 30, |4j,0,0. ?,0,J4. 73,0,0.8,0.38.126,0.8,8.8,43,52,0,8,8,0 
1008-BfTTrt- 40/-] 98, 19 63,8.0,+3,SZj 19,63.0, 0, 30, 108, 19,83,8,0,45, I9B 19,0,0,0 
1210 DA7R 43,32,20,214 0.0,36,126,28,214,0,0.39,95,20,2L4,3,0,43,32,20. £¡4,0 0 
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SISTEMA DE 
CONTROL DE 
BASES DE DATOS 



CÜMF.r COMMODORÉ 64 
CGNF.; 64 K 
CIAS.: UTI 



■ i i \ 



Este archivo puede ser utilizado 
como una base de datos. Su utili¬ 
dad es tan variada como nuestra 
imaginación lo permite. Por ejem¬ 
plo: listado de precios, agenda te¬ 
lefónica, movimiento de cuentas, 
stock y todo esto puede ser pasa- 
do por impresora. 
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Este juego de cartas requiere de 
nuestra memoria. Deberemos re¬ 
cordar entre todas las cartas, dos 
del mismo número, Quien obten¬ 
ga más pares será el ganador, 
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Los servicios de Epi 



SUPERPODEROSO 


Para Equipos 

SPECTRUM 

Ahora es posible, sin agregar 
periféricos a su consola, cargar 
un poderoso idioma en 3 minutos 
desde un cassette, en castellano 


Maneje: e 


200 Comandos 

Inteligencia Artificial 

Assembler 

Color 

Sonido 



EMPRESA PARA 
INFORMATICA 

INSTITUTO: Suipacha 946 1er Piso 
(1008) Capital. Tef: 311-8618 y 49-7985 


Venta exclusiva en: 

YAE Computación 

Florete 503 Cap. M 392-6B16.'20 

CASA SARMIENTO S.R-L. 

D¡ag. Julio A Roca 676 Cap -el 34- 1B26.-'1 
Pssío Colon 1033 Cap Te¡ 362-2441/2250 

AMATRIX S.A.C.I.C. 

Bolívar 173 ■ Tel 3Q-54Bl. l $4Q3 - 34-0145 

ARGECINT S-R.L. 

TEL£>i 1731 2 (ERSA) - C.C. 0 5w¡. 0 (14001 Cap Fed 

Casa Matní VfcNFUFlA BQSCH 7Ü65 - Tel 641-0327.<‘4&9Jí3D5l 

Casa Central AV CE MAVÜ Í402 - Tel. 37-4&31 - Cap Fej 

Agencia Trust CARLOS PELLEGRiW V CORRIENTES - Tel 35-M1&/5Ül9f0344 

Agencia Norte - CÜMPUMARKET ■ AV CABILDO 2369,'71 - íel 735-5241-4609 

Agencia 0«W ■ TRUST JOVERO - Av. Rivadavia 6687 ■ Tél &34-463D - Cap Fed 
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GOBIERNO 


COMP: CZ 1000/1 500 
TK 83/85 
CONF; 1 6K 
CLAS: ENT 
AUTOR. Marcelo Gtoda 
LOCALIDAD: Río Cuarto - Córdoba 



Pantalla 


GOBIERNO 


:=¡; = 

ES‘-JC "SliTlix 

i_e»c-: e = 

pso: |JC“GKE2 = 

J --3Ií_-C.^ l * 

Z’St e-ií-E*: di - 




Se está encargado de gobernar un 
país cuyo principal peligro es la in¬ 
flación, consecuencia de su deuda 
externa. Cada 6 años se realizan 
elecciones y el objetivo es ser re¬ 
electo como presidente. Para eso 
se debe contar con, por lo menos, 
el 50% de los votos. 

Primeramente apareceré la com¬ 
posición de la población del país. 
La cantidad de trabajadores, es¬ 
tudiantes, subempleados, produc¬ 
tores, jubilados, desempleados, mi¬ 
litares y el total. La composición 
deberá influir en la elección de los 
porcentajes del presupuesto na¬ 
cional. Si se desea, hay tiempo pa¬ 
ra anotar las cantidades. Para con¬ 
tinuar pulsar enter. 

Aparecerán luego los posibles ín¬ 
dices de producción, de exporta¬ 
ción, de armamento y de desem¬ 
pleo. Estos son im portantes para la 
producción, ventas de armas y pér¬ 
didas por desempleo, montos que 
intervienen en la deuda externa e 
inflación. 

Al presupuesto se le resta la deuda 
externa (si el país es acreedor se 
suma esta cantidad) formando ei 
monto realmente disponible. Si es¬ 
te último es negativo (es deci r, deu¬ 
da externa mayor al presupuesto) 
el gobierno sufre un golpe de esta¬ 
do y pierde. 

El monto disponible es dividido en 


los porcentajes destinados a: 
Defensa (influye en la exportación 
de armamento y en la popularidad 
del gobierno entre los militares); 
Créditos (fundamentales para la 
producción y popularidad entre ios 
trabajadores y productores): Sala¬ 
rios (influyen en ios trabajadores, 
subempleados y militares); Servi¬ 
cios (en trabajadores, subemplea- 
dos, estudiantes y militares); Edu¬ 
cación (fundamental para los es¬ 
tudiantes): Jubilación (para los ju¬ 
bilados): Obras Públicas (para tra¬ 
bajadores, subempleados y des¬ 
empleados). 

Los 7 porcentajes deben sumar el' 
100% y ninguno debe ser menor a 
5 ni mayor a 25. 

Se ingresa la tasa impositiva que 
no debe ser menor a 1 ni mayor de 
20. Esta tasa influye negativamen¬ 
te en la popularidad del gobierno 
pero es positiva para luchar contra 
la deuda externa. 

De acuerdo a los porcentajes en¬ 
trados, a los índices antes men¬ 
cionados (producción, armas, etc.) 
y a la cantidad de productores, tra¬ 
bajadores y militaros se mostrarán 
los montos de: producción, pérdi¬ 
das por desempleo, ventas de ar¬ 
mas y recaudación de impuestos. 
Teniendo en cuenta que: 

PR—Presupuesto; PC=Producción; 
VA = Venta de armas: PD=Pérdida 



por desempleo; IM=lmpuestos. 

E! cálculo de la inflación Q F) se rea¬ 
liza en la línea 890 y el de la deuda 
externa (Z) en la 1050- 
Pulsar enter para continuar. 

Ahora aparece la nueva composi¬ 
ción de la población. Habré más 
productores y trabajadores si dió 
muchos créditos, más militares de 
acuerdo a lo destinado a defensas 
según lo dado a educación habra 
más o menos estudiantes, etc. 

La nueva composición se estable¬ 
ce en las líneas 1100 hasta 1150, 
interviniendo estas variables: 

X(1 )=tra baja dores; X(2)-est Lidian¬ 
tes; X(3)=subempleados; X{4)=pro¬ 
ducto res; X(5)=jubilados; X(6)=de¬ 
sempleados; X(7)=militares; DF= 
porcentaje destinado a defensa; 
CR=porcentaje de créditos; SA= 
salarios; SE= servio ios; ED=educa- 
ción; JB=jubilac¡ón; OP=poreen- 
taje de Obras Públicas. 

Pulse enter para continuar. 

Cada ano se mostrará la populari¬ 
dad con que cuenta el gobierno. En 
ella influye principalmente la infla- 
clón y la tasa impositiva y, según el 
sector que se trate, los porcenta¬ 
jes del presupuesto. 

Los cálculos están entre la 1220 y 
la 1287 de acuerdo a: 
Impopularidad en los trabajado¬ 
res; E=en los estudiantes; S=en 
los subempleados; M=en los mili¬ 
tares. 

Es conveniente analizarcuáles son 
las medidas que gozan de mayor 
popularidad. Disminuir fa inflación 
es la más importante. Es muy bue¬ 
no tenerla en menos de un 10%. 
Para ello se debe producir, y tener 
aceptables índices de producción 
y ventas. 

El posible índice de producción (A) 
se calcula en la línea 360 y el de¬ 
finitivo en la 405. 

La tasa de armamento (B) está en 
la 370 y la definitiva en la 425, 
Los índices posibles se muestran 
junto con ei porcentaje de desem¬ 
pleo. Como en economía mucho 
depende del azar, en los números 
definitivos interviene RND pero no 
cambian demasiado (nunca serán 
menores a la mitad ni llegarán al 
doble del índice posible). 

Es conven ¡ente, cuando haya elec¬ 
ciones, bajar la tasa impositiva e 
igualar los porcentajes del presu¬ 
puesto aunque no es aconsejable 
mantener esta política continua¬ 
mente porque habrá mucha infla¬ 
ción. 
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YA ESTAN LOS 
GANADORES!! 
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Esta vez al jurado le 
resultó mucho más 
difícil elegir a los 
mejores, por la gran 
cantidad de trabajos 
que recibimos (más de 
ISO) y por la calidad 
del software. Pero 
hubo que decidirse por 
cinco, y ¡os nombres 
son ¡os que se detallan 
en esta página. Como 
una forma de resaltar 
el esfuerzo de tantos 
otros, otorgamos 15 
menciones especiales * 
Por falta de espacio (y 
de tiempo, 
recordemos que el 
certamen cerró el 15 
de setiembre) 
publicamos en esta 
edición ¡os programas 
de los que obtuvieron 
el primer y segundo 
premio t y en sucesivos 
números daremos a 
conocer los demás . 
Gracias a todos los 
que participaron y ¡a 
no desanimarse! El 
tercer concurso está 
en marcha y allí 
pueden licuarse íos 
laureles. 


Sergio y 


: e 

t) t, c 3 f r 




















NOMBRE PROGRAMA PARTICIPANTE 

LOCALIDAD 

COMPUTADORA 

1er, PREMIO 

Gate 

Sergio/Horacio ASAD Rosario 

TS 2068 

COJWIMOOORE 64 





2do. PREMIO 

Truco 

Marcelo/Julién Valetta Cap, Fed. 

TK 85 

CZ 2000 SPECTRUM 





3er. PREMIO 

Karate 

Guillermo A, Baldi 

i Vicente López 

TS 2068 

BARI LOCHE 





4to. PREMIO 

Solitario 

Carlos R. Reiva 

Salto 

TI 99/4A 

GRABADOR 





Sto. PREMIO 

La Mina 

Andrea Sahin Paz 

Banfleld 

TS 2068 

IMPRESORA 





MENCIONES ESPECIALES 




Musical 


Andrés Pellegrino 

Temperley 

TS 2068 

□ibas 


J.J.S. Baca 

S.M, de Tucumán 

TS 2068 

Simulador de circuitos digitales 

Daniel H. Díaz 

Lanús Este 

TS 2068 

Amplificadores operacionales 

José Czerwinski 

Beriso 

CZ 2O0O/TS 2068 

Castillo 


Miguel A. Goyzueta 

San Isidro 

TS 2088 

Lesa 


Juan J. Ruiz 

S, M. de Tucumán 

TK 2000 

TEJ NPN 


Alfredo Segura 

Cap. Fed, 

TRS80 

El rescate de los Wins 

Adrián Ruggeri 

Avellaneda 

CZ 1000 

Batalla naval 


Jorge A, Gioacchini 

Moreno 

TS 2068 

Ploter + UDG 


Federico Mariano 

La Plata 

CZ 2000/TS 2068 

Generador de caracteres gráficos 

José N. Vidal 

Cap. Fed. 

TS 2068 

Gr (í): R - R 


Eduardo l-L Mom bello 

Cap. Fed. 

TS 2068 

Oif (se) 


Ernesto A. Galeano 

Cap. Fed. 

TS 2068 

Países y capitales 


Guillermo Jamllis 

Lomas del Mirador 

TS 2068 

Karate Do 


Daniel Epztein 

Cap. Fed. 

TS 2068 


Mota: A todas las menciones le damos la misma categoría. 


PATROCINO 

SANWA 


AUSPICIARON 
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1] Documentación; descripción 

Es un juego del tipo laberinto, en 
donde se hace necesario vencer 
varios obstáculos para poder Ne¬ 
gar a la meta. 

Inicialmente muestra una planta 
de los i nt ri nca dos cam i n os q u e con - 
forman el laberinto Junto con la po¬ 
sición de monstruos y otros habí' 
tacú los en donde hay que rescatar 
elementos para arribar a la meta. 
Luego el juego se desarrolla en el 
interior del laberinto, visto en pers¬ 
pectiva, donde las puertas habili¬ 
tadas tienen un picaporte rojo. 
Para vencer completamente a es¬ 
te juego es necesario armarse de 
paciencia, mucho tiempo y aten¬ 
ción, 

2) Detalles técnicos 

Esta e$ 3a grabación final del pro¬ 
grama GATE (N° 28); luego de ha¬ 
ber cumplimentado los efectos vi¬ 
suales y sonoros que lo caracteri¬ 
zan. 

Hasta la instrucción 30 pode¬ 
mos ver los nombres de subrruti- 
ñas más importantes del programa. 
La definición de caracteres gráfi¬ 
cos es muy importante pues la gran 
variedad de efectos visuales exige 
una redefinición posterior de los 
mismos, Pa ra e l lo te n eraos e n c u e n - 
ta que la pantalla que muestra el 
laberinto en planta, es re ubicad a a 
partir de la dirección de memoria 
58450. recuperándola cada vez 
que sea necesaria con la subruti¬ 
na de dirección 58430, Esto per¬ 


mite una rápida reconstrucción de 
dicha pantalla y además redefinir 
los UDG, que han quedado dispo¬ 
nibles. 

Las subrutinas TRAMO, GATE y 
DIAG. trabajan encadenadas para 
la construcción del laberinto en 
perspectiva, permitiendo una vista 
de 1,2ó3seccionesalosumo(coin 
siete puertas) según el lugar del la¬ 
berinto. Este es uno de los rasgos 
distintos respecto a otros progra¬ 
mas similares. La forma de trabajo 
pu ede ve rs e en la subrut i n a DISC R, 
En la misma, también puede verse 
la forma selectiva de colocar Eos pi¬ 
caportes en las puertas de habita- | 
ciones habilitadas gracias a la ins¬ 
trucción PRIN.T “N” AND F (ij). 

La construcción del laberinto es 
co m pieta men te aléate ría, e m pleá n - 
dose para ello la variable FRAMES 
del sistema y el nivel de juego, tal 
cual lo visto en la Instrucción 201, 
La matriz A (i j) contiene c, 1”, donde 
el laberinto permite el paso 75 11 
donde se encuentra la habitación 
"DELIRIUM" {también aleatoria), 
“100" donde se encuentran los 
monstruos (aleatorios), “10" donde 
se encuentra la llegada y "15 M don¬ 
de está la habitación "RESCATE”, 

El laberinto se construye porel sis¬ 
tema de cambio de dirección con 
las subrutinas LAB y LABERINTO. 
De los rasgos más importantes, es 
el hecho de emplear una matriz de 
exploración F[ij) de 4 columnas por 
3fitas, la cual es una copiafiel de la 
matriz A(ij) desde la posición ac¬ 


tual en el laberinto hacia la dirección 
en curso. 

Se logra con la rotación de coorde¬ 
nadas en las instrucciones de la 
subrufina EXPL, Esta matriz se re- 
dimenslona, reseteando el conte¬ 
nido anterior, cada vez que se ha 
atravesado una puerta.de tal modo 
de permitir la construcción de los 
tres tramos (a lo sumo) que se ven 
en perspectiva, Es así como, luego, 
se buscan sólo las puertas habili¬ 
tadas en la matriz F(ij), 

El vector D$(l) contiene las direc¬ 
ciones que aparecen luego en la 
pantalla como guía del explorador. 
Notar que DS(f) se modificará lue¬ 
go de haber atravesado una puer¬ 
ta cualquiera permitiendo el em¬ 
pleo de las flechas, siempre con¬ 
servando su dirección, de tal ma¬ 
nera de no "marear” al explorador 
en su búsqueda. 

El programa principal se extiende a 
partir de la dirección o instrucción 
N° 3000, donde se censa cada ac¬ 
ción del explorador y donde se 
arma el juego. 

En la habitación DELIRIUM, se em¬ 
plea la instrucción ATTR (u r v), para 
detectar los obstáculos y llegada, 
En la habitación RESCATE, donde 
están las fuentes "antimateria 11 , se 
emplea la instrucción SCREEN $ 
(u ,v), pues éstas se e nc u e n t ran d is i - 
muladas per estar del mismo color 
del PAPER y de INK. 

Las fuentesse distribuyen también 
aleatoriamente (instrucción 6070). 
En las comparaciones de coorde¬ 
nadas se han respetado las ecua¬ 
ciones de las rectas que confor¬ 
man la pista del dibujo. 

Finalmente debemos destacar, nue¬ 
vamente, el hecho de construir tres 
tramos de laberinto lo que agiliza el 
censado de teclas a través de la 
matriz Fflj). 

Este verdadero juego-memoria ha 
sido elaborado a partir del mes de 
febrero del 85, tras una idea origi¬ 
nal de mi hermano, un entusiasta 
de los laberintos y mía. 
Destacamos el enfoque matemá¬ 
tico de la programación y la crea¬ 
ción de algoritmos de rotación de 
coordenadas, de construcción, de 
censado, etc. 

El mapa de memoria de este triple 
juego, quedará definido por casi 
26,8 KBYTES de memoria BASIC,4 
KB de variables, 11 BYTES de len¬ 
guaje de máquina (58430-)y 6 KB 
de display auxiliar (58450). 

Instrucciones 

1) El programa pregunta por tu 
nombre y nivel de juego, El 5 es 
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el más difícil con menos cantidad i 
de ayudas, 

2) Luego de la presentación apare¬ 
cerá la vista en planta (desde arri¬ 
ba del laberinto), Tü te encuentras 
en el ángulo superior izquierdo. 

3) Deberás en “RESCATE"* resca¬ 
ta r dos llaves, I u ego eo L ' D E LIR! U M 
un candelabro y luego encaminar¬ 
te a la llegada. Si alteras esté or¬ 
den no podra ts term ínar el fuego. 
La puerta DEL1RIUM actuará de 
bloqueo si no has pasado antes 
□or RESCATE. 

En !o$ niveles de juego más fá¬ 
ciles puedes quedar bloqueado 

según tu suerte. Atrévete pues a 
los niveles más difíciles (5). 

En las habitaciones donde hay 
monstruos se te descontarán 2000 
l.de oxígeno. 

4) Luego de 15 segundos aparece¬ 
rá la vista interior del laberinto en 
perspectiva. Utilizando las teclas 5, 
6,7 y 8, que tienen las flechas dibu¬ 
jadas, realizarás los movimientos 
respectivos (6 para avance y puer¬ 
ta al f re nte, 7 para g i ro 180 g rados - 
ret roceso, cambio de di rece i ó n y 

Notas Gráficas 



Pantalla 1 _ 

OXJG£MO =10000 OIDAS ÍW 



UflS MACIñ EL ESTE 


teclas 5 y 8 para entrar en puertas 
laterales), 

5) Puedes pedir 1 ayuda en el nivel 
5, 2 ayudas en el nivel 4 y 3.y 3 en 
los niveles 1 y 2. Pulsando la teda 
A, aparecerá el laberinto visto en 
planta tantas veces como ayudas 
tengas, 

6) RESCATE: 

Se usan las tedas 5,6,7,8, De ¡da 
se rescata una llave; de vuelta, la. 
otra. Cuidado-con las fuentes a tu 
lado, 

7) DELIRIUM: 

Apareces en el ángulo superior 
izquierdoy luego de dos segundos 
te vuelves Invisible-Rescata elcan- 
delabro Utiliza las teclas 5, 6, 7,8. 
Con cada movimiento pierdes 10 
litros de oxígeno. 

8) Sólo tienes tres vidas yen cada 


tramo de laberinto consumes mu¬ 
chos litros de Oj, cuídate de bus¬ 
car el camino más corto’! 

9) Suerte, (Te hará falta). 

Observaciones 

Se han usado los siguientes carac¬ 
teres gráficos: 

En la primer DATA que aparece se 
definen caracteres de la A a la Q. 
En una segunda DATA se usan R ,5, 
T, U y se redefinen los caracteres 
guardados en las letras E, F s O, Q, 
En las órdenes de impresión se 
han puesto las letras en lugar de 
los caracteres ya definidos debido 
a esta redefinición. 

Luego de atravesar RESCATE, PE- 
LIRIUM, MONSTRUOS por prime¬ 
ra vez; podrás hacerlo cuantas ve¬ 
ces quieras sin caer en ellas. 

Pantalla 2 
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6 Le. ■ - = -L„ 

z _E' r 7 rfi 3 1 -110 

- E" 1 " C-ÉTEi =la£- 

= _ = t ’-EiüMüi = i 3-? 

5 lET [ rñGS= H0 

10 LET GP^E2=1E0 

11 ^E 1 " TRhNC’5 = 1SO 
lí .et- 

_et cí rE3siee 
i_£T L HE.Ec?:trc = £00 
i? i_ET l95=2z-0 
i* „ £,í:fl±400 

1“ ^ET DlSIL' T-’fO 
1= i_ET PPE5E-,T= igüü 
¿ £ _ET IÜC E HQN=5 10 
IO _ ET C 0N &T F =o 5 C 
¿i _ET MQN3=920 
¿I ^ET FE3CflTE=6¿>O0 
2- „ET DELIPIUM»1550 

=1 LET LLEGADA=7000 

£5 ^£T muerte =aeois 

V0 PE5TQRE 31 
3 ¿ FOP J =5¿42G Til E : 

32 PERL 6 P'>E J.p NEXT ü 

33 QfiTfl 33 75.330,17.00,31,01. 

ce.3-.É37 isi.aej. 

40 GO füE FPE5EIIT 

SÉ r-R-Tfl J2.50 62.126.t¿6,252.£ 

,¿52 .213 .i20.0,0,120.120,120.4 
£ . 4S . ¿20-124- I¿É 1 2 6 • 6 ¿ .33 .03.31 
. 1.0.0 0.30 J O ■ : 0 ■ 1 £ ■ 1 25.123 . 1 26 , 
£35.16.16.16.¿fT 

51 DRTp 2'5'5 129 159 165,165.1$ 

9 12A,255.13■64.6+.12& 56■16 53 ■ 
124.36.165 .21.126 • 15; --5 .66 ■ 66 . i 

§5.30.255.102.103.0.122 -1£6 

52 DflTfi ¿55,153 153.153,255,1* 

5 1S3 36,£4,62-56 120.1S6.53.10 

70 . ¿4.. &£ ,Sr. . 150 12 4.56.40,60' 

■53 C-fiT* 50.36 60.16,16.56.26.5 
6,0,Si .60.60 .24 .0 ■3 .0•G .24 .60 ■ 12 

6 ■ 126 .60 24- .0.31 ■ 12 -2E -8 . a ,23,4-2 

31 £43 121.126 .¿39 . 199.193.106, 

101 

54 SiESTÜFE 5G 


55 FOP fi=ü tü 15 FCF 5=0 70 7 
RERD C P0I-E J5F CHRÉ i 3.44 + 6 ■ + 
E.C r-iE-.f E N£ ’ 7 £ 

60 ¿O TO 5000 

100 FL0T 20,20 C'PflU 0.140 DPR 
£10.0 C-Pflu -O -140 DRflU -310. 
0 FLÓT 30.42 C'FFiU 0.36 PRflU 1 
25 0 DFPU 0 -86 LRfli.4 -L29.0 P 
LOT 34-, 28; BRftáí S-SS DRflU 15 -6 
DFflVI 0, 71 PLÜT 214.2S :-FF: 
0.55 ÜRfiU -15 -6 DPRU 0,-^0 P 
ETUPN 

110 PLQT £0.20 DRflU 10 22 FLÜ 
T 20.160 Q-PMLj 40.-34 PllT 230, 
160 MRU -40,-34 PLÜT 230,20 
&PPU -40.2c PETUPW 
120 PLO" 1 " 10 5-42 PFfiU Ü .62 CCS 
U 42.0 D F FlU 0 . -62 PET LFftN 
133 FL07 90 5 7 E RñU 0 .47 t 
"0.0 DflA'J 0.-47 CRfli.i -70.C F 
LGT 7 1.45 PPB'i 0.51 DPAU 11 -1 

DPñU 0.-11 PLOT 17B 43 [FR-! 

0.5 1 DPFIU -11.-4 t-ftflU 0.-4S P 
ETUF Ni 

140 PLÜT 20,¿0 Dftpt-I 70.37 Pí_ü 
T 20.160 DPh'J ^0 -56 F-L0T ¿30 
160 DfiflU -70.-56 PLÜT 230.20 
DRflU -70.37 RETURN 
150 PLQT 113.53 DRhL 0.34 DPR 
U £2.0 DPflU 3-04 RETUfiN 

is0 PLor lie ,70 QCñu 0,20 c-Fh 
U 30,0. tfiftU 0--Í0 DRflU -30,0. 

PLQT 98.63 DPflU Q.27 DPflU 6.-5 
DPPU 0.-20 PLGT 451-64 
0.27 DPflU -6,-5 DPRU 0.-20 RE 
TURW 

170 FLDT 20.2-0 CRRg 9&.S0 PLC- 
T 20.160 CPPU 90.-70 PLOT 23e . 
160 DfiflU -90,-70 PLOT 230.20 
DRflU -90.50 PETUPN 
100 PLOT 113,70 DRRLi 0.16 DPPi 

U 10.0 & RHU 0,-16 BETUflN _ 

200 PEri 

20 1 LET R = INT 'PEEK 23672+BND*6 
SS35/ ÍLN NIVEL*!)] 3F PJ65535 T 


HEtJ 6-6 Tü 200 CRNÍÜNIIE F 
202 IF NIUEL -S THE Mi L£T Rü = I 
103 1F NIVEL =4 CP NI : F;_=5 ThE: 
lE t «U=2 

£04 IF NIUEl±Í o» nI vEL =2 ,, nE-. 
=_ET fiU = 3 

£10 lET LAPGC'=NIvEL + S 
220 lET . =1 t_ET fml LÉT. VUIM 
-20 LET ■5 LIM = 2 LE- i^IM=2 _ 
ET ,2-IN = 19 2Í 3 DÉ L&Í 
230 LET X»T.7 LET .«20 K1L 

If!=31 LET V¡(.IHs£ lET 2_7r-!^;5 
LET j'lLlM = 7 Cü 5UE LAB 
340 LET VsS- lET -.=52 lET 
M»31 LET a2l!M=10 lET ,lLl^a2 
LFT £L XH = I =■ L-L- z L'É LÑE 
£60 LE“T tt'l I-=I LET R ' i .í =; 
LET fl 1.1.2 ' =1 LET P 1 2,3 ■ = 1 LET 
A'20.17.31 LE" 1 " ñ 19 . 1 - =1 L 57 

P ' 15 . 17) =1 LE- fi 1 16 . 17.1=1 
P I 6 • 32 =10 L£T R'3, 30 1=1 <_€■” 

fiI8 51 i =1 lET P-9,30'»! PET y f f a 

peh 

281 FOP F=1 TO 20 
290 LET DIRilNT éRNC-t4j LET l* 
J NT iFKDtLfiRÉC' 


3 00 

IF D IP = 0 

T H£ N 

G 0 

TQ 

310 

302 

IF DIPal 

THE N 

50 

TO 

330 

504 

IF DTP *2 

THEN 

QÚ 

TÜ 

350 

306 

IF IIP=3 

ThEN 

&C- 

TÜ 

57G 

310 

LET Xl-L + .¡> l c 

Xl 

1 LIN 


N SO T 0 290 

3£0 FQR J=X TO XI LET tsX+l L 
ET fi íV . X 1 = 1 NE -T 3 S£J 33Ü 

330 LET ", liY'-L IF J-l r lLlM ThE 
N GO TO £9f 

340 FOR J=y Tü r1 3TEP -1 lET 
Y=y-1 LET fltVjXÍ=l NEXT J &L 
TQ 390 

350 LET X2=X-L IF X2 X2LIM THE 
N GQ Tü 290 

360 POP J-X TQ X2 5TEP -1 LET 
X = X 1 LET ñ í Y , xJ = 1 NEXT J 50 
tü 390 
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170 

_ET £ = 

4. I* ¿ ¿LlM "HE 

t¡ GO 

TD 29 0 



300 

FOR J=. 

TO 2 i_E - ■, = r 41 

L 

B 1 

i * a ¿ 

Ni-T J Gü T 0 390 


390 

NE ■ T h 

PET:j p-. 


400 




i 01 

lbt t =D 

3 1- ^ i 3 4 J 


405 

IF I =2 

tmém _E t 1=344 


406 

^ I -s 

THEN _£T 1 = 1-4 


410 

IF If II 

= ESTE TH£*J QQ 

T" 

450 




4cO 

510 

IF Di T. 

: 'NORTE THEN GO 

TO 

410 

IF luí. 

- OESTE THEN C-C 

TO 

= - c , 
440 

IF D j '.I 

= SJR then GC 

TO 





4 50 

FQP 4 - 

TC ' t 2 


460 

IF = 2 3 

“HlN GC TC 690 


4 70 

IF r-lO 

0 THEM LÉ r F'i_- 

+ 

1 * 1H 1 

V - i ■ y 1 



430 

IF ■ 4 1 

I_ THEN -ET F 3.j 

1 — -i 

«;.i =p 

1 • ' 4 1 , ■ J 1 



490 

LET F(2, 

ij “ X * 1 1 = M 1 >' . ij J 


500 

NÉXT J 

GC TC É.90 


812 

FÜP Ji 

T Q ' -I Í-TEP -1 



5£P IF ... = 0 THEN GO TD 690 
530 IF * — i ■ i? ThE.-‘ F I i .. r - J * 

i - Ñ _ ’ - 1 

= 10 IF ►: + l 

i-I =h . . ■ 4 1 

55B LET F= 

BBC NEXT J 
5^0 FÜP J= 

S30 IF J«0 
590 IF -I 
I =fl l. - I J i 
«fl® T F -+1 
til = fi CY + 1 ,J| 

610 lET F 1.3 
Ó2fl UfVT J 
510 FQF J=f 


3 3 THEN lE t F I3.V-U 

■ i - J t 1 I e H J — ' ! 

GQ TO 590 
TÚ --3 STEP -1 
THEN Q J TQ c-sa 
0 ^MEN LET F i' 3 X -,J + 

■21 THEM LET F ( 2 ,X-J 


. J ? 


1 -....^¿1 ~M ■ . 

GO TQ 590 
TQ ■ ■+ j 

640 IF TnEN -3 o To 69® 

esp if x-i 0 then ,£- F.j.j-.- 

2 ■ =fl ( J . X - 1i 

e:- tmcn let f 


i,j- 


, X) 


res pem 

732 
-55 
’60 
770 


w 


650 IF +1 
,1 l «A CJ, X+ll 
6 70 LET F(5,J-YtH=A J 
630 NEXT J 
690 LET T =T * 1 
700 IF T=4 TM£N Gfi TQ 750 
710 IF F(g,Tl=l TMEN 00 tú 69Q 
715 IF FÍ2 T)=15 OH Fifi - =20 o 
P F < 5 . Ti =5 CP F (5 .T; =JL0fl TriEh GÜ 
TD 72® 

720 LET T-T-l 
730 

IF T 
INK 5 

IF Tía THEM GO TG 790 
Ir T=3 TMEN GO TC 800 
'30 GO SüB TRfiHOl GC SuB ÜI AGI 
GO rUB GSTE1 PRINT 3NJ- ~.PT 4- 
■ 2 £.'T-: QUEP 1- PLQT 150.14 1 D 
FñU 0,-35 pHINY INI- S.iRT 3 ,55. 
H" . OUER O. PRUTT IMK 2, AT 13,13 
; "N" AND Fí2,2í;fiT 12,5, "H" AND 
Fll,Í3.flT 15.55. "N ■ AND F(3,n ;fl 
w 12,15 u- BMC- F(í 2;. INK 7 r 
ETQPN 

-9® GO SL'B TRAMÓ 1 GC 5JE TRAMO 
£ GC SUP PXRG2 PPINT iNh 7,PT 
6 14 IN7 1 A- 6.13 ' ■" . A 

T 6 , Ifi; "■ ' , IN* 3.HT T . 14 , 'T U" 
GO SUS GKTE2 PPINT INií 2-RT 1 
£ ,5, "N” AMD - II 1 AT 15.9 ' N" A 
ND Fil.2i.RT 12.51 N" AND Fi.3,2 
J;HT 12 r 25:"W" AND F 1 3 ,1 K flT 15- 
15; "N PNC f (5 6 1 INK 7 RETUPN 

■■•00 GO jUE T AAhQ 1 so 5LIE TRAMO 

5 GO SUE TPAHOS GC EJE DSAG3 
PRINT IMK 3; AT 3,15;'’ " ; AT 4,15. 
-p";AT 5,1S;"P" ; IMK ij flT 6,14; ' 
SSE",AT 15 O' INK 5.AT 5,14. 
,J R" ; AT 3,16. ■R- GO SÜB GATE3: P 
RINT INK 5: AT 15.5. ’M' ANt F i 1 , 1 
J . AT 15 9. N ' AND F 11,51 AT JS .1 
£ ,, N" BMC r 'l 3J ftT 12.13 ■ ri" AN 
D = í 2 4 i . RT i5 18 . • N" AN[■ F I 3.3 : 

AT 15 21. N " ArJD F L 3,5 1 . AT 15,5 
6. II- ANO F Ij 2' IMK 7 BETURN 
310 LET A '.50 17.' =5 

350 L£T Ml=i-lNT 'PNÓ420J L£T 
n 1 b 1 # 3 NT 1 B N D *■ 32 ■' IF «¡ (hl,Nli =0 

OP A MI.NI =5 ÜF 
] TMCM GO TO 
330 LET M£ = i + IhTT 
N5 - L t- IhfT 'ANO'-35J 
OS B ■ Mí . M5 1 :=5 OP 
I TrtEn SO TQ 37-0 
340 LET M 3 = 1 + INT 
N3 = 1*INT ' AND r 35.' 

OP RíN3,M3sb 5 OP 
-HEN GO TO 640 
350 LET A■M1 .NI i =103 LET fli 

Ni 3100 let M ■ -Ij; , fj_ =100 

360 LfT r' = i ■+ INT iRNCt¿0 ' q 

slílMT (fiND+Cñ' IF AÉP .gOsl0 OP 

a f O" «3 op n(p . a--=100 op ip = i a 

NI 0 = 1 I TKEN GO TO 860 
3 70 ^.ET A iF . Q ' =15 RET LHN 
S73 P6M 

330 SOADEP 1 PSPEP 0 
’O 50 FCP i- =1 TQ 35 


i M1 = 1 AMC NI "1 

1 PNC-1-50' lBT 
17 A i MS .N51 =0 
IM5=1 AND N5 = l 

iRND+30' LET 
1= A M3.N3' =0 
im3 = i and n3 = i 




OümE 
flash 



650 ARINT rN“ - PAPER ¿ AT J-l 
. V - 1 ■ E RMD' A I. J . K =0 hE vT X N 
É>'T J 

910 PRIMT INK- 0: PAPEP ^ ■ PT ~ : 

S. V’ AT 15,16 /' FLASH 1, INK 

i, pfiPÉp s.at p-í c-i -F--. FLAS 
i- 0. 2RPEP O ENr e A- MI -1 .nl - l 
i ' PhFER 0 INK 2 AT MS-1. N2- 

l; r, I-. PÍ1PEB Q I«h *.fVT M3-1.N3 
- 1 . 1 J '■ 

515 PR3NT E M K 7 PAPÉP 5,AT 50 
0, EEEEEEEEEEEEEEEEEEEEEEEEEEEEE 
6EEEEEEEEE5EEEEt-EEFEEEEEEEEEEEEE 
EEE 1 

316 PETüRN 
9£0 PEM 

921 LÉT A ( V r JO =1 LET M = 1 
£P 1 PAPER 1 CLS 
930 FOR Jal TQ 35 BOEDER 1 BE 
£= .02 s-C + tO 60PDEC 5: nEXT J 

50PDEP 1 

940 T= =M 1 RMD X=M1 THEN FOR J 
±1 TQ 3E PRIMT , IMK 6,AT IN T 
P N L - i C- 1 . INT IPMD í-31 i ; " H “ ■ fiEEP 
,01. AND460 N ÉXT c• GO T O 961 
955- IF =IM5 AND >:üN5 THEN FÜP J 
TO 35 PRINT AT INT (RND *SQ 
INT .RND+311 INK 5,"I" EEÉP .0 
1 INT • And+6®i MEK.T J ÉO "0 96 
1 

960 I-P V=M3 AND X=N3 THEN FQP ^ 
=1 TO 35 PRTNT , INK 4.AT InT ■ 
R NO *5®i . INT IRND-311 ,"J" BEEP . 
Bl,RNDi60 NEXT =. GD TO 96 1 

961 C ÜP K=1 TO j. FOB j=0 -fl 48 
5TEP 6 5QUND £.0:7.56.0,16,9 1 

5,10.15 13 15: PAUSE 3 

962 INK IJ/B + H PRINT AT 7 fl.- 

rrfci i ■>%n v l r 7. 
i iunuu 

^561 PRIMT RT 11.5.- 

rrr^ri . rt 12 . 5 . ■■ 
j| rt' ME>T j NEXT K 
6,0 9 0.10.0 
965 PRIMT INK S.AT 1E 
1,-HRS PERDIDO £h>O0 L DE 02" PR 
USE £00 FETJRN 

1000 fiEKl _ _ 

1001 BORDE» 1 PRPEÍT 1. CLS : Cl 
H N| 3) LET J=10 

1010 POhE ES431 00 POKÉ 58435.3 
5 RRMDOHIZE USB S8430 PflUSE 90 
1045 CLS • INK 7 

1050 PP.ÍMT AT 0 . 3. FLASH 1 : - A Lfl 
S PUERTAS DEL DELIRIO" BEEP .3, 
10 BEEP .3.40 AAJ5E 30 
1060 PRINT AT 5,3, 'PON Tu NOMBRE 
0 LETRAS' ' , AT - . 10 
1070 PAUSE 3 LET I=CÜ&E JMK£Vt 
IF 2=13 THEN SO TO 1120 

1080 LET J=J41 PBINT AT 7,J; M _ 

ee^F .06 PNGT50 

1100 l_ÉT N*I.J-10 =CHR( Z PRINT 
AT 7,J. OUER 1.Nf(J-10 j 
1110 TF J < i 10 THEN CO TO 1070 
1150 EEE- .0 -15 PPINT AT 11.4. 

'"NO LLEGARAS PftPflCO T A'- 
112? =OR Kal TQ J-10 PRINT AT 1 
5,K+4.N*CK i BÉEP .05 RND*£1 NE 
XT K 

1140 PRINT RT 1E 16. 1 MORIRAS" 
1146 INRU^ " SELECCIONA NIUEL 

I 1-Sl ' NIVEL IF NIVEL 1 OP N 
ILEL-5 THEN GC TO 1145 SETUPN 

1150 RETUPN_ 

REH 

1550 RE5TQRE 1560 

1566 dokE SS4.34.flB: POKE 58435.9 

% 

1560 DATfi 82,555.0®.40,B£,255,B3 
.4®.65,555 

1S70 FQ-R jal TO í PCAD K.L COK 
E 584 31 K. FOKE 5 8435. L PAMC'QMl 
ZE USA 584GB : BEEP .3,ftND+6fl: NE 
XT J PAPER fl BORDE» 1 CL8 
1550 PRINT AT 0,0. INK 5 PAPE» 
1," ERES INVISIBLE! ' Nf 
153£ DIN PÉÍ71- LET Pt ■ " rtftÜfcítBP " 
1533 FÚR J=1 TB 10 LET P^HNC*19 
41 ¡_ET 0=fiND*234l LET PC=RND + S 
: PRIMT BT INT R,INT O. INK 6, A 
APEA 1;A t[ TO INT PO NEXT J 
1564 PPINT INK 6, PAPER 1 RT 50 
C-.P1 RT 2 A ,9: Pi, AT j0.iQ.Pi; AT i 
.5;»$ AT 2,7.; Pf AT 1 50;Pf 
16S9 LET PbPEEK 236^2*5564PÉEK 2 
3673 HBNDÜHIZE P- LET P>1+InT 
RND *20.' LET D=1+IN- RNiCt431 I Z 
F ATTB íP,OJ-1* THEN GO TO 1563 
15BS PRIMT INK 4.AT p Q, F L ñ&H 1 
; "G" 

1590 PRINT AT 4.3. "»■ . AT 16.28 . ' 

I* 

1595 PRINT AT 51.0 INK 6. PAPEP 
1;" NlUÉL OXIGENO ";05. ' 

1600 LET u=4 LET u=3 PRINT INK 
£.AT u,v," l". Pause 150 prjnt 
bt y u:V 

1620 IF INKEX t ="3 ' AND V OÍ PNC 
ATTP UJ.U + 1 í 7S THEM LET U=L'4l 
BIEP .05.10 LET 02=05-10 PPTN 
T AT SI,IB PAPER 1 : INK 6,02,' 

1630 IF IWKEV 1«"5" RNC- IM0 AMD A 


TTC U.U-l : 75 THEN LET '. ='J - l 
LET 02-02-10 BEEP ,05 2 CPIIJ- 
PRPEP 1, INh E : AT 5 1 18 Q5 
1645 IF iNKEt$=““" AND L 0 ANfi P 
TTC 'U-l.V- -r THEN lE T u —U— i 
LET 32=05-10 3EEP .05 4Q FCJ|,T 
PAPER 1; INK 6 .AT 21.IS;02; " 11 
1650 IF INKE'Y t e 'fe' AND U 2® AMO 
ATTP y + 1 .U) ' >76 THEN LET JsU + 1 
LET 03^02-IB' BEEP .0S,2fl: PfttN 
T JNK 5 ; PAFfP 1 .AT Sl.lS.Üfi." 
1655 IF J=F AND 'J=0 THEN ^E^ C3F 
PE =1 FOR J = 1 TO 20 PRINT AT U 
. U■ ' K' 8 EEF ,05.PNCPPINT R 
T J.U "G" NEXT J PPINT AT _■ , J 
■■ ■' pbi i§E e 

1BBC3 IF - U>16 AnC U-£S AND COFRE- 
1 THEN G 3 TO 1660 

1665 IF 02 Í=® then l£t i. IDA=üIdA 
ti GC SUS MUERTE GO TQ 1580 
1670 GO TD 1610 

16*® f-QR j = l TO 20 BPlNT AT 16, 
53:"K' PEEF ,01.PND45B NEXT J 
1690 CLS PRINT PT 5 5; INK 6 

MAGNIFICO '■ :m*. ., AT 10,2, “ÑAS 

HALLADO el CANDELABRO":AT 15.5. ' 
SÓLO TI5NE3 .32-450 " L DE 05' 
PAUSE 25® 

1700 LET fl C Y • =1 G-j TQ 30-® 

RÉM 

2B0e DIN Ki<7)PAPEP 0 ■ CL§ : F 
GR J = 0 TO CUIDA —11 LBT JUtl 

2001 if u=i then go tq 5006 

2002 IF Ja£ THEM co 70 2007 

2003 IF J=3 THEM GC TO 5fl08 

2004 PRINT INK 1,RT 4 PÚ3+2,"KKK 

KKH".flT E.POB+i.-K K".AT 6,P0 


5:"KKK 


KKK".RT 


.PQ5."K 

K",AT a .POS, "K K".AT 9, 

POS; "KKK KKh'-.RT 10 , POS 42 "r 
K" AT 11,PO6 +5. ‘'K K".flT 12 

. POS 4-2 , "K K'.AT 13, POS 4-5, "KKK 

KKK" INK 7.PT 5.PQS4D "B0UI'",flT 
S .PDS+3. "YACE INK 6 . AT - .PQS-i 
l.Nf AT fl,POS+l.Kf 

£005 INK 7 PLÜT 8í.PQS^2.20 DRÑ 
U 76.0: DRAU -51.45: DRRU -33,0 
DPAU -21,-42 DBfiu 0.-6 DRAU " 
s,0 C-RflU 0,6 PPINT INK 3, AT 15 
.POS+4:"EF”. IMK 4 AT 16 POS+5 1 
LV'.PT 17 POS + i ; "O" INK 4 PLdT 
S4 < POS+5 ) , ES DRflU Q.lfl LET J-J 
-i NEXT J INK 7 GO TD 5010 
5006 LET POS=fl LET Kf-"PRIMERO" 
GO TQ 2fl01 

£007 LET PDS =11 LET" Kf = “SEGUNDO 
" GO TD 2004 

2flflB L E TT PQ5=££ LET K ■ = TERCERO 
" : GD TÜ 5004 
2010 PESTORE 2fl£3 

2020 DATA ,4,fl,,1.0.,25 B.,45■£■ 
,45,3 .15,5 , .4.5. , 15 .O. .4 .0 . , 15, 

-1,.95,0 

2030 FOR J=1 TQ 11 

£010 REñD TEMP.K BEEP TEMP.K H 

EXT J. 

2051 IF UIDA i 3 Then PRINT AT 21, 
£ : Nf : " 5ÍGUE INTENTANDOlQ ■■ BEB 
P 1.3,13 PAUSE 100 LET 02=1045 
® CLS PETüRN 

£055 OIH LÍC13I LET Lt ="TE HE G 
ANADO" 

2060 FOR J =1 TO 13 BEEP »1.-PNC 

430 PfilMT flT 50.4 + J; Lf I J] : " ”. 

néxT j PPINT ar SI,15 Nf BEEP 
3 . -30 

2070 GO TO 7101 STOP 

8060 «En progfaha frincipAl 
30B5 DRTfl ‘"OESTE" , ,J SUR ,L , "ESTE" , " 
NORTE" 

3010 DIH UtOi : DlH AtS.fl,32t: DI 
ñ Dí'4,51 

3050 LE 7T 05^10460 LET Ut^’'KKK" 
LET Afl=0 LET UXDÉUB LET L1 =0 
LET L£afl LE T LET H-fl LE 

T COFRE=0 

□055 RESTOPE 3005. FOR U=1 TO 4 
RERE D-ítJ* MEXT J 
3030 GO 5'JB LABERINTO G3 SUE- CQ 
QRHON LET 1=3 
3040 OOPOEP 1 PAPER fl CLS 

3050 GG 5UB CON3TR POKE 58431.0 
0 POKE EB433.91 POKE 5843a,.55 

POKE 58435,255 RANDONIZE Lr5C 5 
8430 LET X=1 LET ¥ = 1 

3051 DATA 9B.126.60 54.0,0.0,B,5 

4.24.24.24 £4.£4.£¿ £4, £4.60. 153 

.£19 .519,105,60,54.4 6.15,60 .3.1 
6.35.64.32 16,6.60 16,8,4.2 

3052 RESTQRE 3BS1 FOR TO 4: 

FOP K=0 TO 7 READ C- PpKE USR 

OHRf (1604J) +K.O NEXT K NE Xt J 

3053 DflTfi 1,3,25,63-7B,15 x £5,19, 
123■192,152,252,98 . 24B , 152 . 280 

3054 PESTORE 3053 FOR J=0 Tp 1: 
FOR K =0 TO 7 PEñD O. POKE USA 

CHPl C14B4J]+K o NEXT K n£XT J 

3055 DATA 0,0.56.156.555 143.1 
RESTOPE Q0S3 FOP Jsfl TO 7. AEflD 

O POKE UBR CHRf il56i*J,O MEX 
T J 

3060 PPIMT INK 7.AT 0,0, "ÍC 1 FOR 
J =1 TO o SEEP ,08,15 PAUSE 5® 
NEXT J 

3070 BORDEA O PAPER 0 INK 5: 0 

L3 


K64 


Pág. 50 















. O ¿O GC 51 E E 'F-l ¿0 . C [ i-CC 

_ r ' ' f = i i_e - f =1 

.CSC LE- ■je - 92-LSO-LÜCÜ-N |_£T 
BÜ 

3100 ZF Ú¿ =0 "H£'¿ T IDA = '. IC h 

GÜ =-Ur. MUERTE :-j TO "O ’Ü 
311C? GÜ SUS 4000 

:-iis .|t f :i; -■ ivn i-eoo 

3120 I? I. INr EY $ = "A" OR jNiK£V*=t" * 
AND *4 AU 71CH £ t E P .01 15 : 

L£ 55431.62 P?rE 5S4¿£.¿ 

55 PÜKE 53434 00 - □ •■' E 5 ■= 4 I! 3 91 

fiANOONl"£ Üñt Sfi'O BEEP .¿ 1 
= PRINT INK O FfiF'ES 7 HT í-1 ■ 

-1 ' K" PAUSE -DC ..ET" AA=pP41 

BURDER C PAPER O ¿t-Jh 5 CL: 

GO TO 34-00 

Jl30 iP 05' i ■•7f THEN t>" T *• 

3170 

3140 if &*,.! . -jr-PTE • THEN C-j TO 

2¿?0 

3 150 IF D í i I - = j£ 5T E ~h+EN '33 TO 
33fí 

316® IF Otíjl- SOR THEN GD TO 

3290 

j 1~0 IF INr,E.f= 7" nMC *F T THEN 
. FT * F = ■ F 4 1 00 5UE 3600 ^E” ■ 

= Ml 

3 1 ?0 IF INK E ■ í= 7" AMD ■ F =T Allí 
F ’ 2 > F 4 I I O T HE' J L£ r - = ' 11 GÜ 

t: 3 í oo 

3I3C 3F IN:*Z *= 5 PNC F i ■ c (-i - F 
0 then let r = r-i LET =.-l 

03 T G 340O 

3300 IF INTE t- 5" AND c ‘ F-i - r - 

c rnE N LET i si t ; lET «v-a 

00 TC 3400 

3310 IF INTE *= ó' TfHEN ¡_E“ Í±I- 
¿ lEt iiK-i so t C . 34^ 

3£30 GO TO 3120 

3230 IF IM«.evi = -7- AMD F T ThEn 
LET ■' F - XF 4 i. GC SLrE 3600 lET . 

= - - I 

3240 IF IHKfi ■ —"7 1 AwC 4FsT A Ni 

F 2. y F 41 i >0 THÉN lET = -1 C-1 

TG 34.00 

3250 I F rWh.E' 5 = -3‘ AND F F*S -f 

■ o TnEN LE T 1=2-1 u-E"^ >=W1 

GO TI- 34.00 

3S60 I F INh. Ei $ = 5 " AND F F-l - “ 
■0 THEN LET 1=1-1 LET > -X -1 
GÜ TO 2400 

32^0 T f INKET *= 6' THEN lET 1=1 + 

£ lET r fe ■ * 1 GL 1 Tv 3400 

3260 GÜ T0 3120 

3290 IF rNK.Ev *i ■■,'■■ ANt 1 F T TM£N 
LET *FaMF* a SO 3UE 3600 LET 

='• t-1 

33*C IF INK£Y-Í«"7" AnC- .• FaT Am£- 
F iT.Ftl) -0 ^HEN (.F- -,4l 

TO -34.00 

3 310 IF lN*Er fB"S" flrif- Fl.F + 1 ■ F 
0 THE ••■I i_E — 1 = 1-1 LET ■ = < - i 
GO T C ¿40O 

?3£0 T F tNKE'T i= E ANC FCYF-1 .F 
■3 T HE N LET I=l4l _E T í'if.tl 
GL T O 34 00 

33 30 IF INF E .-$= '=" THEN LE t I = I - 
S. LET Y «Y-l : 50 TO ¿400 

■ .■ -io SO TC "130 

3350 IF TMKEV t- 1 7 11 AND *F■T TheN 
LET -FMFd 50 JE .600 LET < 
- ■ - % 

J.360 I L INKE ■ 4 - 7" AND < F = T Ahí 

f ¿ ■ F + í 0 T HEr. lET -i’-I ■*: 

TO 3400 

¿3?0 IF INKE-. i = "S‘ AND F ( Ftí > F 
0 THEN LET ;=I-J L6T 3-1 
-GC- T Ü 3400 

3230 IF IN*E ■='5“ 6NC Fi ■F 

0 THEN S-E” 1 = 1 + 1 lET - -1 

1- L TO 34 00 

7790 IF IMF E■ 5 = 1 6 ‘ THEN lET 1±1 + 
= LET X=X4l GC TÜ 3400 

2- 3«5 GC TO 3120 

:400 FOF J=0 TO 40 rTEF LO 500N 
I Í.-j ,*,S5 S 15 9 35.10.15 13 12 
Pfil>3E 1 N E '■ t rCuNC i O 9 C 

.30 0 IF fl-Y.Xi=Í THEN 30 TO O 
70 

.1410 I F A. X! 35 6NC P5=0 THEN A 

I TC PESGA-E 

¿C0 IF A. ■ - ¡O PNC- L-S.i hr.i c 

FF E" = 1 THEN QC TO __E3ñ[-H 
.4 30 I- Ai- ' J =15 4r¡; r9 = i ThEN 
GO T 0 C-ElIRIuM 

3440 JF H . . . =100 THEN GC r l'E H 

.ni GOTO 2070 
3445 GO T 0 3870 
.450 STOP 

36&0 IF MF-£ THEN lET p=.ift GO - 

1 3620 

36 ID IF F.C THEN LET P=14 

2 620 -0R J=E'5 TO SO ET£F =. E-EEP 
.00£.J HE'T J P fi 1 NT IN" 6 A - 

F 15: 3 ' AT P.16 'f ÁT P-l.13 

AT fi-1.16 ' C 

3630 IF p = 16 ThEN GO TO 3650 
3640 P F‘ = 3 4 THEN GO TC '--00 
_-645 OETURN 

3650 PfiENT AT p-r ¡5 ' AT F- c 

.15, IN+ 5 PLOT 115.20 [P 

A'J 3 0.0 FfT-tP'; 

3 - 00 PfiENT AT PG 15 AT F - ^ 

15. ‘ PL l-T 116 4¿ DPAU 25 d 

AETiJFN 


4000 F'RInT IHh i fiT 0.0 ' O-: I GE’-C- 

= ■ 02 ■■ " AT 0.15. I.'ít-rta " ; O* I - 
' 3 -O IDA' Ztlt 4 . AT ¿'i . O . 

A z HACIA EL . AT G 25. Inc 3 •'i 

ANO Ll=l AT 0.30. ir+f 5 i4ÍJ ¡;. 

_2=i AT C.26. G PNC COFRE=1 AT 
¿1 14 PAPEL 2-.D* i, 

4010 PETÜFn 
5-000 FEM 2F r £ = £n t 

5010 BOPtEP í PftPEP 0 &PÍ .-HT ^ 
C'L5 

S020 FOP H=-l TO 30 fiN = INT 

RN£-*-6 + l ' FPINT JtcT Pr J. A"!- 1 rj G 

BEEP . 001 . r-J + 30 NE- T f-J 
5030 FOP N=2 T :• a l£T ¡-n = in- - 

ND + 6 + 1 • PFINT INh C . AT N 30 C 

EÉEF r 001 ,rJ+ 10 n£:-.t n 

5040 FOF N-2'A T3 3 :TEP . LE t 
fiN = INT RMC+e + l' FPINT INh RM A 

t s.n -ü- 6 Efp ,oei.N +20 11 r l t 

N 

FOP N¿7 T :> 2 iTEF -1 LET F 
N-ENT FNip-*54 1 • FF INT iNf FN . hT 

N.I O' 6EEP .001.N+3D NEaT N 
FOpC PRIHT TNK 6. BRTGHT O hIT 
3 -SERGIO' BEEP ,2.0 
S0-0 FOF N=3 T _■ a PRINT INI 6 
B-PIGht 3 ■ AT 3 . N SERGIO- PPJhiT 
A T 3 N-I ' BEEP .01.W-30 NE"- 
T N 

5030 F-RINT INr S. PRIGHT 0 AT 3. 

22 HOAAC II "' BEEP .2 3 
5093 FOP N;££ Tp 3? ST^P -1 PPI 
tr INI 6. SPI3HT 1.AT 3.N. HOFPC 
10" PRINT AlT J.N47." ' BEEP ,0 

1 N-4 NEXT N 

5100 FPINT INK S-AT E 15 'Y" PA 

U3E 40 PCINT INC 7 AT ¿ 15 I 
A’" 3 15. I . AT 4.15 !, | OT 5 15 

"O' PAUSÉ 30 PRINT INK - AT 5. 

15 .AT 5 . 15 ■AT 4.1S ■ O "■A 

T 3 15."Y" PAUSÉ 20 PRINT INK 

7 . RT a . ISj ■' • A T 5 ■ 15. ■ ■ hT 3 ■ 1 

5 O .AT 4.15 

5110 PAUSÉ 20 PRINT INK T.ftT 3-. 
15 . ' .AT 1.15 ".flT J.1S -ffl" A 

- 3 i 5; "Y" 1 FAÜ5E 20 FRIIJT AT 2 

is ■ ' 

5120 FRIMT INI- £. BPrGHT i , ÑT 5- 
14 ASAD ' 

5130 C-m '*'£0 LET ’| = " PRESEN 

TAN 

5 340 FOP J=0 *0 £D PRINT INi* 7. 
AT 10.31-JlStÍl TO Jl BEEP 
J-20 NEXT J 

51S& PEER .1.1- RflUSE £ BEEP . 
1 21 PAUSE 2 BEEP .1.24 PAUSE 
2 ÉEÉP .3.26 PAUSÉ - EEEF ,1 
24 PAUSE 2 BEEP , ' ¿6 
5360 FPINT INh 4 AT 11,11.'PP" A 
T 12.31. "PP" fifi IN - INI- 5 ■ AT 13, 
i 1 ■ ■ AT 14 1 . U • 

5 170 FRIN^ INh 4 - A T II 34. "PP ' A 
T 12.14. ■PP' AT 13,14-"PE" PfilN 
T INK 2.AT 14 14 fi AT 15 lA 


INh 4 AT 
' AT 32 . 1" 


51-30 PfirNT 

PP INT I+-I p 
37, ■ | ' 

5190 PRINT INh 4 A T 
T 12.20 ’PP RT 13 
20. PP" PPIMT Iiih 
F''.fiT 162P L 
620O ^FIN~ INh “ AT 
ECTA5, C-El DELIRIO 
PA „A CONSTRUCCION- 
LflEERIN-O '30 . fe-J U 
PC 10 FQR N ■ í. 1 TC tí 
NT AT N 0 El A- N 

n , ¿a, -se-. ftT 

005.N+40 NE‘T N 
6220 GD T O 1000 
5490 re- apafei 
6000 BOflDEP 0 PAPE 
L 5 

5010 


ia^i?. "pp ■ 

7 ^ AT 1J 

12. ■ií'. “PR ' A 
20 FF".AT H 
6-AT 15,20 
PAL SE 60 
16 .5 ""^A5 FU 

HT ¿0,5. ÉSPE 
. AT 21.3, 'DEL 
r jos i " 

"TEP -2 PFI 
-I 0. Al " A T 
, "AC " BEÉP , 


F 6 INK. 0 


P F 1 1 NT PAPER 2. 


DRA 
" R I 

-iT 


2015 SO &L-E 6020 C-3 ' ^ 

S020 FLÜT 20.C LFA',4 5 6 ! 

5“ 0 DFAU ,5-5,-136 INh 
NT AT 3 . Id ; " If-lí- 0 

112 143 DPAU 47.0 E-RA .1 0 
fiAU -4 7 0 DRA--J 0,-5 PlZ'T 11. 

45 OPAL 47.0 P —C-T 11£. 1 4 - 
■J 4“ 0 PLOT 112,343 DRAU 4“ ^ 
PRINT AT ¿.15 ' 

6025 PRINT TMK 6 PAPER 1 A T í. _ 
6 "h¡ " , INH ",AT 1,1?, -H" RETUfiN 

6030 INK 7 PLOT 0,152 DPAU 24, 

ic c-pau s.-a r-RAU 6 10 DPALi 1 

3,-22 DRAU 40 25 DfiflU S -10 I 
fiA'J 16.6 üfifiu £4.-5 DPfiU S.2 
C-FAU 16.-15 C- P A U 15 I0 DRFl 5 , 
-5 C'R-fiiJ 40.12 DfiAU IB -34 DRA 
U 6.15 

6040 PL07 36 124 DF AL 0.62 PlÜ 

T 90 • 126 OPAL! 0 ;.£ PLCt 94 • 1 32 

DPAU 0,32 FLC^ 134 124 DRAU 

O. 32 PLOT 1¿E CPAL 0.32 P 

P. T 1-6 132 CFAU 0.J.? 

5050 FPINT INh 2 FLASH 1.AT 20 
14 ■ £ - JT PP InT INK 4 PAPER 


o. flash 0 at ai.e." peco-j 

H lAS- lLA-'FS 

tese PRINT INK 0,R“ 6 i- 'FuENTÉS 
--.AT 7.0 -ATJTIHRTFRIm . hT &.j . L 
INDERRS " 

•‘O-O T - * iPEFi E367Í. t£56*REEl- 
23673 PANDON HE ■ -* 

60d0 lET Z1=I9 lE‘ 22=16 LÉT L 
1-0 I. ET L í = 0 
61G0 r -ÜF 11 = i TÜ 20 

6310 LET ..=4^lFf T PN[.,¿5i LET 

= 6 +INT RN.D + 32 

6 320 IF ■ ' . i 4 - 1 ■ 2.5 AND .' ■ - i 

■ a, 5*5- TMFr, GC- TO 6U0 

6330 GÜ TC 6110 

Cito É-EFR ,01 .A-ND + bí PPINT 1N+ 

6 . F'APEP 6, AT ,- -f . ■ T " 

Él 70 NE <T 'J 

BISO PRINT TNv S FPPEF f-. AT 1¿ . 
9 . "■#++■. AT 9 11 ' + * + " . AT 19 ‘ 4 

t+" AT is.sa •-- + ■• 

6120 i_£T MIN =0 LET Ñ5=0 PPINT 
IN-x 0 AT Zi Z 2 ■+■■ 

6*00 LET ■ i-z J - L lITT fl::I¿ GO 
SUE 6-00 

6210 LET jíifiZl4i GÜ 5UB 6700 
6220 LET X13Z1 LET i-taza*! C Q 
5UB 6“00 

É230 LiT .1-22-1 GO SOB 670® 
6240 FPINT INK 7 PAPER HTN+l.PTT 
9.4 MlN 

Ó250 IF INKEV*= - Ah*C Z1 4 AND 
Z1U.S+Z2-31 ANC- II - 1.54 5iZ2 +25 
,6 *HÉN BEEP ,01 40 GC SUÉ -SEhSÍÜ 
-,F T 11=71-1 GC 5üB 6SÍ0 GO 3 
JE 6500 IF RE =1 THÉN GÚ TO 6200 
6260 IF lNKE'* -"6 " ANC- II 19 TnC 
N BEEP .OI.-IB GO 5UB 6500 
Zi=ZI+l GO SUB 5600 GD SUB 6B 
00 IF PS-Tl THEN GO TQ C,£00 
62^0 IF INk.ETÍ = "B" AND Z2 -: <11+3 1 
■1,8 ThfN 5EEP -01.20 00 sue 6 

500 LET Z2=Z2+I GÜ SUB 6300 G 
O SUB 6S0O IF PE =1 THÉN GÜ TO 6 
200 

5230 IF INKEYt = "5" AND Z2 -fZI-2 
5xS) .■ 1 .S4B THÉN BCCP .01.-20 GD 
SUB FT Z2=Z2-1 SO SUB 6 

30O GÜ SUB 6500 IF P5 = 1 THEN G 
D TO 620* 

6290 IF Zl-i T riEN SÜUND 7 S£.a 1 
5 FOP E =30 TO 100 STEP 2 SOUNC 
O E PAU5E 3 NEXT E SÜUND d S 
9 0.10.0 7.63 PPIN- INh 1 AT 1 
,:±7; 7* H : LÉT Ll-1 PfiINT ÜMK 3.3 
T 19.16. "H" PRINT INK 2 PAPER 
0.AT 3.14;"UUÉLUfl" 

6300 IF l 1 - 1 AND liria AND 
THEk SOuND 7.62.5,15 FüP E=30 
TC 300 SOUNC- 0.£ fiAUot 3 NE xT 
L SOUNC fl. 0.9.0.13.0 7 60 IFT 
L£-3 PRINT AT 21.26 "M flT 21, 
¿e ■ *+■ PAUSE 120 L£T pe=nút pe 
LET A'20.171=1 GO TO 3070 
6310 GO TD 5190 

6S®a O VER 1 RRIhT InK 0. f»T Z1,Z 
2. "K ' OUER 0 
6510 RÉTUfiN 

6700 IF SCREENt (XI ,VI¡‘I , ‘ + " THEN 
LET HlN=hINH 
3 710 PÉTUfiN 

630® 3F SCREÉNi -Z1.Z2- *' THE 

N RETURH 

6310 SOUNC 6.c.-.7,i.16■9■16,10. 
16-15 56.13.5 PAUSE 30 SOUND B 
.0,3.0; 10,0 l_£T ri-fl=UIDP+l 

6S20 “B-INT PAPER f flT Z3 .22. . 

TF VIDA 4 THEII GÜ TO 6330 
6325 GO SUB HJEPTE 

600® LFT 71=19 LET 72 = 16 ir L 
1=0 LET P5=I ÍNK 0 GO SUE 602 

®. PETURN_ 

PEh 

7000 CL3 Pl iJ* 5 9 í 

7030 CATA .3.9 3-56 .35,9.B.-2*. 

, 75 ó 16.24 ,25 9 0 - 52 . .5 S £.2 

6.0. -25, .25.4.26.0 , .4.6.0.06 . .S, 
9.3-3. -33 . . 3.9,0 - 32 . >35.9 - -24 . -80 
7020 DATA .75 6,-35.15 ,25.9.70. 

43 .5.6.0 70 .35-6■-5.S,-5.-6..4 
.4.01.-50 ,3 0.10 -12 11 0.0. £4 . 
5. 1.15,-2 .7,9 4 4 ,35 9 4.-26 

Te 30 Z-AT A .75.6,3.0 ¿Ü , 2® . . 15 9 
.$6.11 ,06 9 -3 5 -10 5,-10.-5 . 

3.4.20.-2D 5 0..3S 11 0.24 .5.13 
.3 9• ,35 9.16.0. - 45 -6 
7040 DATA 0.-16 ,34 0.16 ,4.21 

6.0,,3 -1 4.-2S ,41 -16,-16 .4 

1.-16 -16■,3 1 -16 -16.,35 ; -1 
- 1 „9 -3 

30 PESTORE ^010 FüP NüO TO 76 

■ F PD C,D 

IF D - = 1 AhlC- c O THÉN BÉEfi 
c tq -te® 

”0 : . RAU C D 
'103 ;'XT N 

7101 "P 1 F-3.R , =1 T D 2 PLOT 

76,37 3PU 1O0 IO0 P1+255 N£feT 
,i OUt- T 

7110 POR =1 TO 3 FüP h=0 Tü 20 
O STEP 3 jO'JNC £t ’ S6 • 8 ■ 1S, 2 • 
15.10■15■13■ 1S PAUSE 2 
"7120 SÜUND e,K PAUSE 2 NE V T t- 
NEXT J 

7130 SÜUND 6,0 9.0 10 3 
7140 P U N 
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£2] TRUCO 



CGMP.: GZ 1000/1500 TK 83/85 
CONF,: 16 K 

CIAS : ENTRETENIMIENTO 
AUTORES: MARCELO y JULIAN 
VALOTA CAP, FED, 


Fundón amiento 


deja ver en pantalla un gráfico se 


El programa posee 2 listados. 

El número 1, posee las Instruccio¬ 
nes sin número de línea y hay que 
ingresarlas en la computadora de 
esa manera. 

El número 2 (ei más extenso) es ei 
listado común del programa, 

Al ser cargado el programa empie¬ 
za solo. 

La primera pregunta que nos hace 
Se refiere a la cantidad de puntos 
que queremos jugar ia partida, 

Al ser ingresado el dato requerido 
la computadora comienza a traba¬ 
jar en el modo Fast. 

Lo que hace en ese lapso es re¬ 
partir las cartas de la ronda corres¬ 
pondiente. 

Al ser repartidas las cartas, la com¬ 


meiante a éste: 

El programa desde ya posee casi 
una total similitud con el juego def 
mismo nombre. 

Las diferencias que existen entre 
ambos las detallaré a continuación: 
1) Existen el envido, real envido, 
fior h truco y retruco, 

2 } a: el envido se canta sólo dentro 
de la primera mano, 
b: el truco solamente a partir de la 
segunda mano. 

3) Al recibir alguno de los conten* 
dientes una flor, automáticamente 
se le adjudican 3 puntos al que la 
haya ligado. 

4) a: no hay falta envido, 

b: no hay vale cuatro {para el truco), 
c: no se puede contestar a un 
envido con otro envido. 


5) La computadora siempre es ma¬ 
no (siempre tira ella primero en ca¬ 
da una de las manos)aunque usted 
haya ganado la mano anterior. 

De ese modo si pardan en algún 
envido, los puntos son para ella 
(por ser siempre mano). 

6) No se puede abandonar o irse al 
mazo, hay que seguir hasta el final 
de la ronda. 

Comandos 

No es difícil manejar y deleitarse 
(modestia aparte) con este progra¬ 
ma. 

Pero ponemos como requisito po- 
co menos que esencial, que el que 
vaya a manejarlo sepa jugar al ll t ru¬ 
co M , ya que estará lejos de com¬ 
prender el funcionamiento de este 
programa, aquel que no sepa jugar¬ 
lo en su versión original. 

El programa no corre con gran ve¬ 
locidad (ni mucho menos) para que 
aquel que esté jugando tenga tiem¬ 
po de pensar lo que hace. La parte 
superior de la pantalla se cubre 
con un gran cartelón fUD. JUEGA"), 
Cada vez que nuestro turno ha lle¬ 
gado, ya sea para tirar una carta o 
para responder aJ envido o al truco 
de lacomputadora, recién después 
de que haya aparecido ese carte¬ 
lón, se podrá utilizar el comando 
que sea de nuestro agrado. 

Lista de comandos 

PRIMERA MANO 

"E". PARA CANTAR ENVIDO 
"R"; PARA CANTAR REAL ENVIDO 
“N": PARA RESPONDER NO QUIERO 
■‘'S 1 ': PARA RESPONDER QUIERO 
U J": PARA JUGAR UNA CARTA 
1,2,3: PARA JUGAR LAGARTA 1.2,3 
(SOLO DESPUES DE APRETAR LA J) 

SEGUNDA Y TERCERA MAMO 

"T' r : PARA CANTAR TRUCO 
"R" PARA CANTAR RETRUCO 
"N": PARA RESPONDER NO QUIERO 
'-S"- PARA RESPONDER QUIERO 
,J J"": PARA JUGAR UN A CARTA 
1.2 ó 3: PARA ELEGIR UNA CARTA 
ENTRE 1,2,3 (DESPUES DE HABER 
APRETADO J). 

Todos los comandos son directos: 
Ej.: Para cantar envido apretó la 
,l É" y listo (la computadora me con¬ 
testará y seguirá el juego), el úni¬ 
co comando que no es así, es el 
que sirve para jugar una carta, Pa¬ 
ra hacerlo debemos apretar prime¬ 
ro la “J'Ly Juego recién et número 
de la cada que queremos tirar. 

Ej.: apretó 'X. 

2 q para tirar la carta N° 3 apretó 
I "3”, 


putadora vuelve al modo Slow y 


MENSAJES DE LA COMR 


N 9 DE RONDA* 



SCGRE DE 
LA PARTIDA 
(LA 1* CIFRA 
CORRESPONDE 
AL SCOflE 
DE LA COMP ) 


CARTA 

QUE TíftA LA 

COMPUTADORA 


CARTAS 
QUE LE 
TOCARON 
ORDENADAS 
DE MAYOR 
A MENOR 
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Estructura de) programa 

1) Presentación e ¡metalización de 
variables y dimensiones {6-20). 

2) Repartija de cartas (200-300). 

3) Extracción de ambos posibles 
Envióos o Flores (800-1 500). 

4) I a mano (1500-6000). 

5) 2 a y 3 a mano (5000-8000). 

6) Sector de gráficos (8000-9000). 

7) Actualización de puntaje de C/u 
y retorno a la repartija de cartas 
(9000-9600). 

8) Gráfico de la partida (9600-Final). 
Esos son ios principales bloques 
en tos que se podría dividir el 
programa (a grandes rasgos), La-s 
c i tras e nt re paré n tesis i n dican apro¬ 
ximadamente entre qué parte del 
listado se encuentra c/sector. 

Gráfico final de la partida 

Durante toda la partida hay dos 
variables que se encargan de Ne¬ 
var la cuenta de la cantidad de 
puntos ganados por ambos juga¬ 
dores en cada ronda. 

En base a eso se desarrolla al final 
del match, un gráfico explicativo 
de ia evolución de la partida. 
Dicho gráfico aparece dividido en 
2 partes. 

En la parte superior están los da¬ 
tos del humano y en la parte infe¬ 
rior los de la computadora. 

En cuanto a la escala de las barras 
(que representan a los puntos ob¬ 
tenidos) es de: 
escala: 1,7 plots = 1 punto 
Teniendo en cuenta que para gra¬ 
dear la máquina redondea al ente¬ 
ro más próximo, se puede decir 
que esas barras son aproximadas, 

Demostración 

(de cómo jugar una partida) 

A la primera pregunta que nos ha- 
ce la máquina referida a la canti¬ 
dad de puntos a los que j Ligaremos 
la partida, contestaremos por ej,: 

15 

Eso significa que jugaremos el par¬ 
tido a 15 puntos. 

A continuación del Fast,al ser ma¬ 
no la computadora, empezará ju¬ 
gando ella, Puede hacerdos cosas: 
1) Cantar Envido. 

A Jo que nosotros podemos con¬ 
testar: 

a) QUIERO: Esto se hace presio¬ 
nando la tecla “3" (sí) (Para usar 
cualquier comando se debe espe¬ 
rara que aparezca el cartelón "UD, 
JUEGA”). 

b) NO QUIERO: Presionando la 
tecla “N H (no). 


Pantalla 



c) REAL ENVIDO: Apretando la 
tecla "R“. En este caso el que gane 
recibirá 3 puntos {en vez de 5 pun J 
tos como en el truco verdadero). 
Supongamos que contesta QUIE¬ 
RO. 

Entonces ia computadora anun¬ 
ciará su ENVIDO y le dará los pun¬ 
tos al ganador. 

Después de esto tirará una carta 
(pues a sita le toca tirar o jugar), 
2) La máquina también puede "ju¬ 
gar callada 11 y tira directamente su 
primera carta, 

Después de que aparezca el car- 
telón, Ud. puede hacer lo siguien¬ 
te: 

a) Cantar ENVIDO: Lo cual hará 
con la tecla “E" (la computadora 


contestará con QUIERO, NO QUIE- 
RO, o REAL ENVIDO), 
b) Tirar Ud. su primera carta-(con 
lacual la primera mano quedaría 
terminada). Esto se hace apretan¬ 
do la "J" (de jugar) y presionando 
luego el número que se halla a la 
izquierda de cada u na de sus 3 car¬ 
tas. 

Al haber ti rado su carta, la compu¬ 
tadora le anuncia quién se adjudi¬ 
có la mano. 

Da comienzo entonces la segun¬ 
da mano. 

Al ser siempre mano la computa¬ 
dora, puede hacer dos cosas. 

1) Cantar TRUCO. 

A lo que Ud, puede contestar: 
a) NO: Apretando la "N”, De esta 
manera finalizaría la primera ron¬ 
da. La computadora se pone en 
Fast un momento y luego aparece 
la pantalla con el score actualiza¬ 
do. correspondiente a la ronda si¬ 
guiente, 

t) SI: apretando la Jl S", 
o) RETRUCO: Apretando la “R” 

2) JUGAR CALLADA: 

En vez de cantar TRUCO la com¬ 
putadora puede JUGAR CALLADA 
la segunda carta. 

Las opciones que tendrá Ud, en¬ 
tonces serán: 

a) CANTAR TRUCO: Con la letra 

iiyi' 

b) JUGAR CALLADO a su vez, con 
lo que la segunda mano finalizaría 


Listado 1 


LET 

RONDA “ 0 

LET 

S 

£3,2) = 

11 

LET 

S 

(10,2) 

- 6 

LET 

PTS 1 

= 0 

LET 

S 

(3,3) = 

11 

LET 

S 

(10 r 3) 

- a 

LET 

PTS 2 : 

-.0 

LET 

s 

(3,4) = 

1 1 

LEI 

s 

(1 0 : 4} 

= 6 

DIM 

R (4) 


LET 

s 

(2.1) “ 

10 

LET 

s 

(7,2) = 

5 

LET 

R (1) = 

35 

LET 

3 

(.2,2) = 

10 

LET 

5 

(7,4) = 

5 

LET 

R (2) = 

45 

LET 

s 

(2,3) = 

10 

LET 

S 

(6,1) = 

4 

LET 

R (3) = 

49 

LET 

s 

(2,4} - 

10 

LET 

S 

(6,2) = 

4 

DIM 

S (4,4) 


LET 

s 

(1,3)” 

9 

LET 

S 

(6.3) = 

4 

LET 

M$(1) ^ 

= “ESP 1 ' 

LET 

s 

(1,4) = 

9 

LET 

5 

(6,4) = 

> 4 

LET 

Mí (2) 

- "BAST” 

LET 

s 

(12,1): 

= 3 

LET 

s 

t&,1) - 

3 

LET 

MS(3) 

= "ORO" 

LET 

s 

(12,2) ■ 


LET 

3 

£5,2) - 

: 3 

LET 

M$ (4) 

= "COPA 1 ' 

LET 

s 

(12,3) ; 

= a 

LET 

S 

(5,3) = 

> 3 

DIM 

S (1 2,4) 

LET 

s 

(12,4) = 

= 8 

LET 

S 

£5,4) = 

3 

LET 

S(1,1) 

= 15 

LET 

s 

(11,1) 

= 7 

LET 

s 

£4,1) = 

2 

LET 

S (1,2) 

= 14 

LET 

s 

(11,2) 

-= 7 

LET 

s 

(4,2) = 

■■ 2 

LET 

S (7.1) 

= 13 

LET 

s 

(11,3) 

= 7 

LET 

s 

(4.3} = 

2 

LET 

S (7,3) 

= 12 

LET 

s 

(1 1,4) 

= 7 

LET 

s 

(4.4} 

2 

LET 

5(3,1) 

- \ 1 

LET 

s 

(101) 

= 6 
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(para jugar recuerde que debe 
apretar \T y luego el numero de ía 
caria). 

NOTA: No confunda Mano con 
Ronda, 

No describiremos la tercera mano 


porque es idéntica a la segunda, 
Entre mensaje y mensaje de la 
computadora aparece un ‘'borra¬ 
dor 1 ' (cuyos caracteres son at azar) 
y que limpia la parte superior de la 
pantalla. 


Espero que al igual que “Ruleta 
R usa", "Tr uco” s ea de vu est ro a g ra' 
do: y recuerden que si desean po¬ 
nerlo en su revista, deben explicar 
que hay que ingresar el Listado 1 
primero, y sin números de lineá¬ 


is fer "TRUCO " 

8 CEM POR MARCELO ■ 

UALüTTp -i?S* 


AND 3 X =1 “HÉK _ 


J-JLIflN 


7 print cr i© 

1 PT 5 

V at is.a "R Que 

JUGAR ■■ PT 10,3 
E ESOS GAUCHOS" AT 
NAIPES *10 £PGM lERC-OS” , 
■ AL TRUCO CONTRA Tr ' : AT 
RPIRN TODOS COMO 


PT 0- . 10 

10" VI *A *- 

PUNTAJE DESER 
"A CESAR CE CU 
13,0."CON LOS 
AT 12 S 

13 ,0 'PE 

CERDOS ..." 


s 

LET 

U*="" 


A 

LET 

Ui="" 


10 

LET 

8fll=0 


1 1 

LET 

5 P 2 = 8 


1£ 

^ z~ 

RTSlaíi, 


13 

LET 

PTS¿*0 


14 

:_ET 

RONDA*0 


15 

INPUT LIUFF 


17 

FA5T 


¿0 

CL 5 



220 

L5T 

PONDA sRDNDA 11 

2 05 

r im 

T(12.41 


210 

DlM 

AIS) 


220 

DIN 

BO' 


¿38 

DIN 

C 1 3 1 


¿48 

DIN 

D C3J 


£50 

DÍÑ 

E (3 


£50 

DIM 

F 13:' 


800 

- OF 

V =1 TO 3 


310 

LEt 

A CV J «INT 

■ »ND 

320 

IF A IY ' =S GF 

R (Y) 

TO 310 




LET F ÍY =SiD(':J 
LST T (D (Y J ,É (Y) 
NEXT V 
LET DÜNa0 

K 13) 

L Í3 i 
ÍH 3 i 
M 131 
0 13 J 
P 13 

K=1S TO 
Gil TÜ 3 
C 1 G1 = >■ TriEN 


DIN 
DIN 
DIN 
DIN 
DIN 
Pin 
- u P 
C QR 
IF 


STEP -1 
GOSUE 500 


THEN GO 


332 LET B £ Y ) =1NT íRnD+4+1) 

S£S ZF V-L THEN GOTO 330 

3£E. IF TíAiV I B 1 .Y 1 jil THEN GOTO 

310 

330 LET CIYli&'flíY) jBIY'H 

337 LET T . fr (Y! .e (Y) i = 1 
3 10 LET D S Y ) = I NT í RND +12 41) 

3*5 IF C‘ <Y '=e CF D 1 r • =9 ThEN GO 

TQ 3*0 

346 LET E (V i = INT '! P N D * 4 +1) 

347 IF Y±í THEN GOTO 349 

_14Ó IF TlDCl ,E(Y*)-l THEN GOTO 

340 

349 LET F |V i =3 fD (Y) , E (Vi ) 

403 LET T(D(Y) . E (Y) Mi 
413 
422 
425 
430 
435 
4 3ó 
437 
43B 
443 
4*2 
443 
44S 
447 
450 
530 
535 
53 7 
503 

509 

510 
6 00 
eie 

39 3 
69 S 
530 

so; 

635 
700 
710 
720 
^££ 

"724 
~¿S 
301 
503 
S0 3 

804 

805 
306 

310 IF LUI TL S) AND LUI L 1 j 
. AND L(3 j • L(3 THEN 
3£0 IF LUmLíS RND 
THEN LET F_GR1=1 
322 IF FL OPi = I THEN 
8£3 CIM QtSi 
825 FÚR x.±l TO 3 
627 IF K(X) Í THEN 
530 NEXT > 

535 tqr X =1 TO 3 

536 -0R =1 TO 3 

637 IF »■ =* ThEN SOTO ¿53 
633 IF L(Y)*L OO THEN GOTO 3S0 
850 KtxT t 
8 52 NEXT *• 


600 


G0.SUB 700 


NEXT G 
NEXT X 
GOTO 63E 
LET D3N -DONt-1 
LET h (DON =P(G 
LET L íDON‘í -B i.£ 
l£T M(DÜN —C’ G; 

IF DON *3- T HEN GOTO 
PETÜRN 
LET DQN=0 

FDR X - 15 TO 1 zTEF ~1 
FDF 3=1 TO 3 
IF F (Bi T.hEN 
NEXT C- 
TJEXT 

GOTO 300 
LET DON-DON+1 
LET N i.DON =D g 
LET Q (DON" =E 'G 
LET P i D ON 1 = F I.G i 
IF DON =3 T HEN GOTO 
P:£T URt-i 

LET FlC=I=0 
-LOR2=0 
EHUIOl1—20 
ENUI002-50 
UhLLN-.MO 
UflLREAL =& 

LUI OLÍ2) AND L I 


¿00 


LET 

LET 

lET 

LET 

LET 

IF 


L 

GOTO 500 
L : 1 i =L i3 

GOTO 900 


LET O vj=¿ 


O IXj =0 THEN L 
O IXf =1 THEN l 


THEN _ 


380 IF O£V i =1 
ET ENU 1001=20 
362 IF QV Mi PNC 
ET ENU IDQ112 0 + f ■ 

364 IF O i. i ~0 PNC- 
ET ENUIDQ1=20+H ( Y 3 
368 IF y r > i =0 PNC- C ' Y =E 
ET ENVIDO! =£<& + ( ■ ■ i +( (Y 
300 IF 0(1)00(31 RND O (2 j O t i 
) ftND O O) 00(1) THEN GOTO 1000 
9 ID IF O* 1)=0 (2) PHD 0'1I*Q S' 
lET ^LÜP£=1 

IF =LGP2=1 THEN GCT3 1000 

DÍM '-i 1-3) 

FOR x =± TO 2 

IF N í.X) -9 THEN i_ET g IX) =1 
NEXT X 

POR y*l TO 6 
FOR .-1 TQ 3 
IF Y=X THEN GOTO 945 
IF O 'XI ;D(Y) THEN GOTO 
NE Xt Y 
NEXT A 
1 C O I A 

ET ENUID02=20 
952 I F L'X =1 PNC- 
ET ENUID0E-2O+N ■ 

964 IF U(X =0 9ND 
E T E NU ID 02 =204 N ( \ 

966 IR U i X / = 0 PNC- 
ÉT ENUIDO2=204N = .< - 4N * 

1000 IF FLOfll-l OR FlOR2= í 


THEN 

923 

924 

925 
=m r 
930 
92 S 
937 
540 
943 
945 
947 
9¿0 


96 0 


l! P'JD U (Y) ol THEN L 


g (Y) =:0 THEN L 
U!Y) ±1 THEN L 
U ( Y) = 0 THÉN L 


THE-i 


DP FLGR2 = 1 THE N 
THEN LET P-T31±PT 


IF FLDR2al THEN LET PT52sRT 


lE t UALENU-1 

1002 IF FLOR 1=1 
L£T UGLREflL-1 

1003 IF FLOR 1 = i 

Si+ 3 

1004 
52+3 

1005 
1007 

1503 

1504 
15 06 
15 06 
1530 

1510 

1511 

1512 
ISIS 
±616 
151 7 
ISIS 

1519 

1520 

NDA 

1521 

. PT 

18 


LET 

LET 

LET 

LET 

LET 

LET 

LET 

LET 

LET 

LET 

LET 

DIM 

DIM 

DIM 

DIM 


¿L»MA1=M ' 1 • + H Í2t -HC3- 
5UMR£=P i 1) +P r£ -PC3) 
CONTESTO=0 
FRRDHL =G 
C H AUE NU IDO a 0> 

FARDA 3 -9 

FPRDP-0 

MANO 1-0 

MfiiNO£=0 

PT5=B 

CARTPJUG=0 

2)3) 

JO) 

H (3) 

U (3) 


PRINT PT 10,19;"PONDA 


PRINT 
14 , 1 


PÜ 



1" ,PT G,30 ' 


1525 FDP G=12 TQ 18 

1523 PRINT PT 0^27. 

I 

1524 NEXT e 

1526 PRINT RT 12.2. ' " PT 1 

7,£: 1 ^ B ^" 

1627 FOR G =.12 TO 17 

1629 PRINT hT 0,1, ■" |-";flT G, 7 , "| 

1530 NEXT G 

1531 PRINT R T 13,2 "I - 

1532 FOP G=6 TC 21 

1533 FRINT RT ¿,0.' 


PT G 31 I 


1534 NEXT G 
1533 FRINT FT 33 



1542 FOR 0 = 1 TÍ) 3 

1343 PRINT PT 14 + G . LE:G. "N [yt 
" DE " . Mi i O LGJ ■ 

1544 NEXT G 

1545 PRINT PT 15-í;PTS1.“- M .PT52 
1S4S 5L Ü14 

1547 LET I=i 

1548 IF L.RlENU >0 THEN GCTD 1550 

1549 !•= ENIDO 1 >ÉN J IDO2 RND RND + 
□>1 THEN GOTO 1600 

1550 IF FLüPi=l THEN PRINT AT O, 
8."TENGO FLOR>CHAMICO" 

1551 IF FL0R1 = Í THEf. PPU5E 100 

1552 IF FL0P1=1 THEN G05UB S0S3 
LE54 LET las-INT (RN&43+1I 
1655 IF 125=2 THÉN GOTO 1580 

1556 LET 123-2 
1558 GOTO 1504 

1580 LET I23-INT RND+3+1) 

1B84 LET z ' 1231 =1 
1SS5 i_ET JH =123 
1S0F LET CRRTPJÜG-1 

1557 GOSUB 3000 

1588 GQ5UE 3000+R : L(123 ) 


15S9 FRINT A T ll,ll;KH23) 

1396 GOTO 2000 

1602 LET URLENUf1 

1F05 PRINT R - 3,13. "E NUIDO 

1606 LET CONTESTA=1 

1620 GOTO 2000 

200 3 GCSUP ¿I 2-32 

2005 C-Ü5UE S073 

PRINT PT 15.2: FTS1 - . P^S2 

£012 IF INKEY $ = ' E ' RND UALENU a0 
THEf i GOTO 2400 

£014 IF INKErf- P" AND UALENU =1 
RND URLREAL=3 RND ChAUENUEDO“0 T 
HEM GOTO 2^00 

2016 IF INKE/I- ." RND CONTE8TP= 
0 THEN GOTO 2700 

E01E IF INKEy' ( = ’ 3 ' RND CONTESTA ± 
1 THEN GDTÜ 2200 

£020 IF JNKEYi= " N" AMD CONTESTA* 

1 THEN GOTO 2900 
2022 GÚTD ¿010 
2400 GQSLi'B 6033 
2404 LET UALENU =2 
£4 0F LET CüNTESTfi =□ 

24 0 7 IF EN UIDO 1 iEN U1002 T HE N G OT 
□ 3000 

2410 IF ENUIDÜ1 ENUIDO£ AND RND» 

3 .6 THEN GOTO E45S 

¿415 PRINT AT 3.5."NO HR VENIDO" 
¿422 LET PT52-RT52+1 
¿4¿4 GOTO ¿472 

24 50 RPINT RT o ,5; ■'QUIERO,CHE. . . 

2452 IF ENUIDD1 -ENUID02 THEN LE 
T PTSl=PTSl+¿ 

¿494 IF ENUID02 ENUIDO 1 THEN LET 
RTS2aPT52+2 
243S PRU5F 300 
£+56 GOSUS 8033 

£460 PRINT PT £.10 "TENGO" ; HÍ 4, 

4 . E NU I DO 1. ■ ’ DE ENU I DO 

2461 IF ENUID01 -ENUIDQ2 THEN PP 
1NT AT 6.9."Y SON BUENAS" 

246£ IF ENUID02 ENVIDO 1 THEN PRI 
NT RT 5.9. "'JD GPHR" 

2470 LET CHflUENUIDO-l 
2472 APUSE 100 
£473 GÚSUfi 8033 

2474 IF CARTAjUG =2 TrlEN GOTO 155 

0 

2475 IF CPlRTAJUG = L THEN LET CONT 
ESTA = 0 

2476 IF C RRTfl J UG =1 THEN GOTO 200 

0 

£477 IF GRATAJU£=2 THEN GOTO 500 

B 

2500 GDSUB 8083 

2503 LET UAlREPL =S 

2504 ^ET CÜNTESTfl-O 

¿SOS IF ENVIPOl "> = ENU ID O 2 THEN GO 
TO 2550 

ESOS LET PTS2=pT52+2 

£510 FRINT RT 3,10. ’-NO, GRACIAS. . 

2515 GOTO 2472 

2550 PRINT AT 3,10, "OUIEAfl 1 

2552 IF EWUIDQ1 =ETJUID02 t HEN lE 

T PTSlaPTSl+3 

£553 IF ENUIDQ2 ENUIDOl THEN LT 
PT5£-PT52+3 
£554 GCTD 2*55 

2700 gosus a08: 

2710 PAINT AT 3,4, "ELIJA SU C1ART 
A (1,2,31" 

2712 LET NSzJNKEYÍ 

2713 IF N|~“1 ' OR Ni="í" QR Nt = 
3" THEN GOTO £715 

£714 GOTO £712 

£715 IF U (UAL N tJ =i THEN GOTO 27 

14 

2718 LET H(I.i=UAL Ni 
£719 GOSLiB 8033 

272B IF H (J (I) ) ^IHtlN THEN LET 
H AN O 1=H AN 01 + 1 

2 7 £ 1 P RINT RT 14+UAL Nt.20, 


£7££ IF M( 
MRN02 =HRN 
2725 IF H( 
PRRDRil 
2724 IF I — 
¿725 IF H 
NT AT 3,3- 
£7£E IF Mi 
NT PT 3,3, 

2727 LET U 

2728 !F H( 
NT AT 8,3, 


Jll!) íPlM(Il) THEN LET 

02+1 

J (I) ) =P i» (I 1 ) THEN LET 
1 THEN LET ChRTAjDG*2 


J (I) ) >P "i H CI) 1 
"EST A HfiNP ES 
J (I) ) :P LH (I) I 
"UD GANR ESTA 
CUPL N*I=1 
J (I) I =P I.H I) i 


THEN PRI 
MIA" 

THEN PRI 
HfiNO" 

THEN PRI 
"ESTA MRNC QUEDA PARDA 


£7¿9 IF r*£ THEN LET CARTAJUG=4 
£730 IF 1*3 THEN LET CARTAJUG =6 
£731 IF 1=2 AND MWH1 |;P(H(Ih 
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^HElJ LET FflPtfli-1 

£7.3.2 I c IiJ ANO “iJ-I = F tH( I 

^!~ETl i ,ET FfiFCRJ-1 

2753 IF 1-1 THf'l SOTO 24 72 

¿7+0 I F l 1 THEN 'SOTO 6470 

£300 3DSUB S-flflS 

25 03 lET CONTE 5TR-0 

¿305 IF ENUlDtil £7 AND *0 

THEN GOTO 3000 

2ri0 IF 0PLPEAL.-1 THEN -E7 RTS = 3 
23i£ TF UALREAL =0 THEN lET FT5»£ 
£515 -F EN'JIÜ-Oi =Ehípicos THEN _ E 
r PT S1■RT51+PT5 

2316 IF ENUI0D2 EN'JIDOl THEN l ET 
--3¿=P1G¿+PT F 
¿820 GOTO £457 
££00 GÚcUS 8 CS 5 
¿■¿02 LET CHAL — 'J J ID ü = 1 
£503 UET CONTESTA±0 

= £04 IF .JílLREFU =G T HEN LET PT$1 = 
PT514 1 

££05 IF VALREAl^I THEN „FT FT61 = 
PT S14 £ 

£306 SOTO £4 72 
3000 GOSÜfl 805 :■ 

3003 LET UALRERl= 1 
3005 LET CQNTÉiTflaí 
íJtí7 PCINT RT 3 I '• LE CANTE ÜN 
PEflt. EMU IDO.., 

3003 PAUSE 100 
.010 SOTO £000 
5003 .-ET TRUCO 1*0 
500J- LET truco =' =o 

501? 5 L ET U ALT R U C = B 
5006 LET UñLR£TPUC-e 
500 7 LET PT5=0 
5615 LET 1=1+1 

5016 EP 1:3 THEN L ET 1=3 

4510 IF 5l,IHA ¿ £0 fiNC URLTPUC=0 m 

■dD lPNp+3 :• 1 . 6» I »iñN toy i u 3 1 00 

50 £4- IF SUrtfti SUHR£ PNC .^u T RUC = 

3 THEN GOTO 3100 

5025 EF 1=2 THEN ^ £T CRBTflJUG=j 
50£6 EF 1=3 TN£N _E^ 'IñFTPJUG=3 
*$27 IF HANO!=l “HEfi GOTO 50SO 

502 3 =F MANO1=0 THEN GOTO 50T0 
5050 FÚP G=3 tq i 5 T EF -1 
5031 EF Z > Gi = 0 THEN GOTO 5090 
505 2 ISEXT G 

5054 GOTO 509 0 

5070 FOF 0=1 Tü 3 

5072 IF 2 ÍGI *P THEN GOTO 5090 

5071 NEXT G 

5073 GOTO S09O 
5090 LET Z«G) = 1 

503 1 i_ET Jllj =6 
3092 GÜ5U8 500? 

•F093 GQSD6 0O00+R CL 1 G ) 

5094 PRINT PT 

5055 GOTO 6000 
5100 LET 1 J R L ” R L 1 C = I 

5103 PRINT RT S.ae.'TRUCO " 

5105 LFT CONT35TR=l 
5107 PRU53 10Ü 
5109 GOTO 6000 
6001 'GD5ÜE 3033 
600J GOSUfi 5073 

6005 PRINT riT 15 2 FTSI,'- + T5£ 

6015 IF lNKEY*a”T" RNO ORLTRUC-0 
THEN GOTO 6+00 

6017 IF INhF'M R- PNC URLTPj: =1 
PNC UflLftffTPUC = 0 THEN SOTO 6300 
6019 IF INKEv í = J' PNC- CQNTÉ5Tfl = 

5 THEN GOTO £705 

60¿¿ IF rWKEY*='5" AND C ONT E z Tfi = 
1 THEN GOTO 6300 

6024 IF INKEV $ = "N “ RNC CONTESTA» 
1 THEN GOTO 6900 
3030 GOTO 6010 

6 4 00 GQ6U6 509 7 
640+ LET UAL " RUC ■-£ 

6+09 LET CONTESTA*0 
£4 10 .. ET PT5 = 1 

6+11 IF 3UMP1 28 ThEN GOTO 7000 
6 + 15 IF SUH«1 :-2S THEN GOTO E450- 
6415 FRINT PT 3.4,"NO TENGO Ni O 
P EMPEZAR" 

0+20 GOTO 9100 

6 + 50 PRINT PT 3 £. ■ QUIFPO" 

6482 LET PT5 - = 

6+70 PAUSE 10O 
6472 GÜSUB 8083 

6474 1= CPRTRJUG=£ ~HEN GOTü 502 

7 

64 78 l e CPRTAJuG=*3 THEN J.ET CONT 
E5TR=0 

6+76 If CARTAJU&-3 THEN GOTO 800 
0 

6 + 73 IF ORFTPJUC- =4 Tn£M GOTO "S 
00 

6800 G05UE 305: 

6302 _E T L flLftETPü-C = 2 

6504 lET CONT ESTO'=0 

6505 _ET FT 5 = 2 

6 506 IF SUnfll'SUrtRá THEfi GC-TI 65 
521 

6506 PRINT PT J ■ -2 . 1 'M0 QÜIÉPÚ 

6509 OOTO PISO 

6550 LET F'T 3=3 

6552 PRINT PT 1.10. QUIERO ■ 

685+ GOTO 5470 
6 330 G O SUS -30c: 

-503 LET C0NTE3TRs8 


&Í05 IF ÚPLRETRuCiO THEN LET ET; 

6007 3F UPj_fiETftUC = L THEN LET PT : 

6609 GOTO 6+^0 
6900 GD5UE- 50a. 

6902 IF 'JPLn , E nr P'. I =0 ThEM LET -T. 

= 1 

690+ IF UflLRETRUC-i THEN l£T p^3 
=2 

b906 GOTO 9000 
-0Q0 lET UftLRFTPUCíl 
" , C02 LET CONTESTR=I 
”004 í, ET FT5=£ 

7006 FFlHT RT ; .3: 1 CUTERO RETPUC 

o - 

7007 FRU5E 12ÍI 
7005 GOTO 5003 

7^00 IF HPN01±2 TM£»J SOTO 91700 
7310 IF HAMOS■£ THEN SOTO 9100 
7S¿0 IF PPRDP3 = 1 THEN GOTO «000 

7521 LET I-S+l 

7522 IF I 3 THEN ^ET 1=3 

"'S£7 JF HPNO1 = 1 PNC PflRCA¿ = l The 
H GOTO 9000 

-'524 IF MANOS =1 PNC PPP DA2 = 1 ThE 
H GOTO 9100 

”526 IF PFüRCRtI P r í C FP + DP2 =1 PUL 
PPP0R=:1 AND MPNC-1=1 THEN GOTO 9 
000 

752“ JF PñfiI>P = I RN1 PRPCP2 = i PNC 
PRP0R=1 RMC HflNÜ2=l THEN GOTO £ 
100 

7528 IF PP.R D ñ = 1 prj;- HPN61 = 1 THEN 
GOTO 9000 

7^2-9 IF PPR0P = ! PND HPND2 = 1 THEN 
GOTO 9100 

7530 IF CRRTftJUOsi “HEU GOTO 502 


t 


10 

16 


7502 IF CAFTflJUGaB 'H£r. lET :ON7 
E5TP=C 

7535 TF CRRTRJUG±6 “PF', SQTv 630 
3 

9005 FPINT RT 7.9. 

3010 FOR “ - ¡ T 3 10 
<Í020 PRTHT R” 9* - , I- 
3023 NEKT . 

6024 RJVINT PT 20.9 
60+0 R ET U P! J 
3035 RRINT PT 1+ 

3037 PRINT PT 15 
8030 PRINT FT 16 10 

3039 FPINT RT i7 10 
b¡HC PRINT RT 1? 10 

6041 FETURN 
60+3 PRINT RT ±¿ t 13 
13.10. 

PT 15.10.' 

PT 17.10 " 

:RT 19.10 
3044 AETUFN 
604S PRINT PT 12 10 

6047 PRIN T RT 1+ 10 
15.10 jmm ■■ . RT .6 10 

-■ 17 10 . ' M 1 ' ■ * T is le : 

6043 PETURN 
0050 FRINT PT 13,10.‘ 


✓ 



PT 14.10 
RT lé.13- 
PT 15.10 ' 



. PT 
f" . R 



. 10 ;' 

16,10; “ _ 

.PT 15.10- 
S051 PETURN 
6080 PRINT PT 


15,10." 

PT 17.10. 



l^UF! 


3031 CETURN 

3034 . FT H£ 3 = INT RND+6D+1'+3 27 

3056 LET U = C Hfi I H c. 1 
3037 t .ET F| = li*lt+I$r 


+ It + IÍ + I*+U + IS*IÍ t II » I S 4 I J. + IÍ + I 
í. + lS + I* + Ii + H^IitI*rIS~Il'Il4l*- 
is4ii4ií+n 
3 035 FDC G =0 tq “ 

3089 PRINT fiT Q V fe 

3090 N E y~ G 

3091 -=0F L-=0 ‘ 

5092 PRINT PT Q B 


6093 NE ■T -j 
309+ RETUFN 

9BB0 IF UflLTRUC C ThErj ^¿t RT5. 

=RTSi tPTB 

9001 IF UPlENU=0 P^C URLTRUC±0 T 

HEN LET PTS1=PT514¿ 

PP02 if u fileno 0 rn: ,ir_truc=0 

THEN LET PTS1=P T .141 

9010 ocre 910+ 

9100 IF Uflj-TRUC 0 THEN LE T PTSS 
=P T 5 £ 4 PT S 

P202 IF Ufl+ENU=0 RND 'JPLTRUC =0 “ 
HEN LET RT -.2=+'T r= 

9102 IF UflLENU■ D PNC UPLTRUC=0 
THEN LFT P'S£=crSl f : 

9104 LET U13 O &4 5T PI .PT&l-jRl- 
91i?5 LET 5 P 1 = PT 5 1 

9106 l. ET d'Mll^íTPl PTSS-5R2- 

9107 LET : fl;-FTi2 

£133 IF PTSI =L IMITE HP PT5¿,zlI 

PITE THEN GOTO S500 

91 <¡>9 CL S 

9110 -P5T 

9£'Í0 GOTO £00 

S500 G05UF 3031 

9502 PRINT RT j. . 5. ‘TEPilINO EL PP 


KT ICO •’ , PT 15.2: PTSI. 
9305 PRU3E 500 
9504 CLJ 
+5B5 GCTC 9600 
9510 SRUE "T RUCSI 
9320 GOTO 1 
9500 FflST 

9602 LFT Pl=RTSi*100 
9S04 LET P2=P T 52*100 


- PT 5 £ 


PTS1+PT52 
PT z 1 + FTr£ 


m 


05 P P INT PT ! ,£■ 


9606 FDP Y=9 T0 ¿1 
950“ PRINT RT 0 


HT 


, 31, 



LET RE=f 

FQR G=£ TO RONDA 
LET PE=FE*2 

FOR F =£ TC 2 + 1.7*UPL US G 
PL0T RE . F 
3573 PlOT PE41.F 
9674 N£XT F 

3676 F DP F^É.2 T0 ¿¿ * 1 i 7 *GRL Vi ' 


3 


9677 P1D T PE.F 
3675 RLOT FE*1 f 
0665) ! 1 E X T F 
3620 NE5T g 

3692 PRINT RT ; ¿ POP CIENTO 

f 2 .pt io . 2 ;"PORciento -.ri 

9700 3.LDU 

9710 PAUSE 999? 

9720 CLS 


9750 GOTO 1 


COM PUTACION E N EL CORAZO N DE BOEDO 

SPÉCTRUM TK 90X COMMODORE CURSOS 
LIBROS CASETES PROGRAMAS A PEDIDO 
IMPRESORAS DE SO C. P.S. PARA SPECTRUM C/TNTERFASE INCLUIDA 


^OTORTRONICA S.R.L. 
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En esta sección atendemos todas aquellas 
consultas y sugerencias que nuestros lectores 
deseen realizar. Para ello sólo debe dirigirse 
a esta redacción, sección “Consultas”* 


Quisiera pedirles publi¬ 
quen un programa para 
usar el assembler en la 
TS 1000- 

Aprovecho para felicitar¬ 
los por la revista que tan 
dignamente dirigen. 

Andrés Marjos 
Comodoro R iva da vía 
Ghubut 

K64 

Para poder programaren 
assembler, recomenda¬ 
dos tratar de conseguir 
un programa ensambla - 
dor ya hecho en cassette, 
con sus respectivas ins¬ 
trucciones. Se deben tam¬ 
bién poseer algunos co ■ 
nocimientos básicos res- 
pecío del tema r para po¬ 
der utilizarlo 

Lo s manuales que vienen 
con estos programas T ade¬ 
más suelen estar escri¬ 
tos en inglés. 

INGENIERIA 

En primer lugar quiero fe¬ 
licitarlos por su excelen¬ 
te revista. 

Por supuesto ya estoy 
suscripto a ella y espero 
que así sea por un tiem¬ 
po más. 

Soy estudiante de 4 año 
de i n ge n ie n a C i vi I y estoy 
en esto de la computa¬ 
ción no hace mucho. 

Tengo una TS2068 y has¬ 
ta ahora la uso más para 
entretenimiento, pero con 
un grupo de amigos es¬ 
tamos interesados en dar¬ 
le utilidad prof esional. Es¬ 
pero que publiquen algo 
al respecto. He escucha¬ 
do hablar sobre progra¬ 
mas de carga rápida, qui¬ 
siera saber de qué se tra¬ 
ta y qué aplicación tienen, 

Los saluda: 

Martín Bergada 
Capital Federal 


K64 

Los programas para apli¬ 
caciones especificas no 
son de mucha difusión, y 
por fo general son siem¬ 
pre hechos de forma “ar¬ 
tes anal". Por eso aprove¬ 
chamos a publicar tu in¬ 
quietud por si aigún lec¬ 
tor que los haya rea fija¬ 
do quiera publicado pa¬ 
ra lograr este intercam¬ 
bio que beneficie a todos 
tos colegas tuyos 
Respecto a la carga rá¬ 
pida o "TURBO" es un 
sistema creado sobre to¬ 
do para evitar la piratería 
de los programas comer¬ 
ciales, más que para que 
carguen más rápido. Pa¬ 
ra esto último conviene 
adquirir un sistema de 
disco o microdrive (en 
cuanto estén disponibles). 

TS 2068 

Me gustaría ver más pro¬ 
gramas utilitarios para 
2068, 

Tengo problemas para 
cargar programas escri¬ 
tos para otras máquinas 
con sentencias como "NEW 
UNE”; “FAST'; "SLOW. 

Jesús A. Porto 
Rojas - Bs. As. 

K64 

ftEWLINE equivale a EN- 
TEfí; FAST y SLOW direc¬ 
tamente no hay que intro¬ 
ducirlos. 

LOAD 

Tengo el agrado de diri¬ 
girme a ustedes a fin de 
hacerles llegar los mejo* 
res deseos y felicitarlos. 


La revista es espléndida, 
muy completa, con bue¬ 
nos programas y se pue¬ 
den leer claramente. 

Me animé a escribirles 
para consultarles sobre 
m¡ CZ15D0; intento car¬ 
gar un programa desde 
cassette mediante LOAD 
”" y no entran, Probé con 
cassettes de Microsoft; 
Czerweny y Sinclair, Es¬ 
te último lo adquirí junto 
con la máquina y es el úni¬ 
co que puedo cargar ca¬ 
si sin problemas. Contro¬ 
lé todos los cabies P volu¬ 
men, e incluso cambié de 
grabador y la máquina es 
nueva. 

K64 

Las máquinas del tipo 
10QQ/1500 ó TK83/85 usan 
un sistema de carga que 
no es de lo mejor ; Esto 
trae muchos problemas 
para sus sufridos usua¬ 
rios. Pensamos que aún 
no le agarraste la mano o 
que ninguno de los gra¬ 
badores que usaste es 
adecuado . Trata de ajus¬ 
tar la posición del cabe¬ 
zal reproductor y fe remi¬ 
timos al articule publica¬ 
do en la N° 1 de K64, o ad¬ 
quirí un filtro "ad hoc" 
Suerte . 

ACCESORIOS 

Primero de todo los feli¬ 
cito por la revista en sí; 
sus ilustraciones son ge¬ 
niales. Tengo una CZ1600 
y quisiera saber cuáles 
son sus accesorios. Ten¬ 
go la curiosidad de sa¬ 
ber si se le puede colo¬ 
car Joysticks, Impreso¬ 
ras, Generador de Soni¬ 
do como en Ja TK85. Un 
cordial saludo. 

Maximiliano N. D'Auro 
(11 años) 
Mar del Plata 

K64 

Se pueden conectar sin 


J-rF J « V ' ' ' «y • « . r j p—' • m** V V * « 

Aiphacom 32 y el genera¬ 
dor de Sonido. Pero no te¬ 
nemos noticias de que 
existan interfases acá pa¬ 
ra Joysticks, Saludos „ 

NEGATIVO 

Poseo un ordenador TK 
85 de 16 K conectado a 
un televisor. Quiero sa¬ 
ber si es posible invertir 
la imagen de modo que el 
fondo sea negro y las le¬ 
tras blancas, para impe¬ 
dir el cansancio de la vis¬ 
ta, Conviene hacerlo por 
medio de periféricos, mo¬ 
dificando el circuito de la 
máquina, o por medio de 
un programa? 

Los f e I íc ito po r la p u bi ica- 
ción que ocupa un vacío 
de información, brindan¬ 
do datos a aquellos usua¬ 
rios que, como yo, recurri¬ 
mos a concesionarios que 
“no saben lo que venden", 
Enrique J, Sanjorge 
Acassuso 

K64 

La imagen de video en 
negativo se puede lograr 
por cualquiera de esos 
tres medios. El que lo rea¬ 
liza por software ya lo pu¬ 
blicamos en ei N° 5 en 
' Sacándole Jugo a la CZ 
y TK" Pero este método 
tiene el inconveniente de 
tener que cargar ese pro¬ 
grama cada vez. Sin em¬ 
bargo „ pronto publicare - 
mos un circuito bastante 
sencilío que se puede co¬ 
locar dentro de la máqui¬ 
na y con una llave pasar 
de “negativo a positivo " 
Con e/ video inverso se 
tiene fa dificultad de que 
cuesta mucho mas obser¬ 
var las rayas cuando se 
carga un programa, 

CIRCUITOS 

Debido a que me dedico 
a le electrónica, me gus¬ 
taría ver publicados los 
circuitos de las compu¬ 
tadoras comercializadas 
en n uestro país, para con 
ellos poder diseñar y rea¬ 
lizar periféricos. 

Antonio Falco 


Sabemos que hay mu- 


r 
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esc no pe ramos en la bús¬ 
queda de esos circuitos 
i( misteriosos" Decimos 
“misteriosos*porque nues¬ 
tro sentido común aún no 
logra entender por qué 
ciertos representantes de 
estas máquinas en nues¬ 
tro país se niegan a dar¬ 
nos esa información, adu¬ 
ciendo que es 7rrtorma- 
ción confidencialAde¬ 
más de ridículo r nos pa¬ 
rece absurdo; porque o 
es que acaso han inven¬ 
tado la pólvora ? o pien¬ 
san, tal vez, que algún 
avezado técnico electró¬ 
nico aproveche el circui¬ 
to para fabricar copias de 
esa computadora??? 

Por el contrariOt pensa¬ 
mos que esto atraería jus¬ 
tamente a personas que 
como usted podrán desa¬ 
rropar Interesantes inter¬ 
fases, que ampliarían eí 
uso de nuestras modes¬ 
tas maquinitas además 
de hacerlas más popula¬ 
res y vendibles . 


CONSULTAS MIL 

En primer lugar los feli¬ 
cito por su revista y por la 
forma qué la encaran, En 
segundo lugar necesito 
hacerles unas consultas: 

1) Haya la venta material 
bibliográfico en castella¬ 
no para la TK2Ü00, ya 
que el portugués me sa¬ 
le por las orejas! 

2) Reemplazo para la fun¬ 
ción INKEYS del ZSO pues¬ 
to que hasta el momento 
uso una subrutina en as- 
semblar que resulta in¬ 
cómoda? 

3) Cómo realizar figuras 
propias en alta resolución? 

4) Información sobre soft¬ 
ware disponible y peque¬ 
ño resumen de mejoras 
si es posible. 

5) Se pueden conectar 
otros periféricos aparte 
del disk drive? 

6) Información sobre los 
comandos STORE; RE- 
CALL; SHLOAD; WAIT; 
HlMEM;LOMEM;ylauti- 


MP; POP? 

7} Funcionan ios progra¬ 
mas de APPLE? 

8) Existe en el país algún 
televisor con entrada pa¬ 
ra computadora. ¿Qué es 
más barato un monitor o 
un televisor? 

9) Me gustaría ver publi¬ 
cados circuitos útiles pa¬ 
ra conectar a las compu¬ 
tadoras. 

Perdonen por esta larga 
lista, pero son dudas que 
necesito resolver para sa¬ 
carle jugo a esta máqui¬ 
na. Ah!, y una última: ¿Me 
recomiendan algún cur¬ 
so? 

Diego Gómez 
Avellaneda 

K64 

Bueno, bueno ... parece 
que tenes alguna que otra 
duda . Lo peor de todo es 
que, justamente, se trata 
de una máquina que se 
ha vendido muy poco en 
nuestro país, y que, por ¡o 
que sabemos, también 


sil (allí prefieren las que 
son tOQ% compatibles 
con Apple y no mas o me¬ 
nos). 

Pera te ayudamos en fo 
que podemos: 

1} No conocemos que ha¬ 
ya nada 

4) Te sugerimos consul¬ 
tes con el negocio don¬ 
de adquiriste la máquina 
o en otro de tu confianza. 
Todos tes representantes 
oficiales de Arvoc poseen 
una lista actualizada, 

5) No sabemos de nin¬ 
gún otro periférico r ex¬ 
cepte (a impresora . 

7) Sólo funcionan algu¬ 
nos programas de Apple 
grabados según la norma 

Applesoft y que no ten¬ 
gan instrucciones en as- 
semblen 

S) Están empezando a 
aparecer fábricas de mo¬ 
nitores, pero según nues¬ 
tro gusto son muy feos 
Por ío que sabemos hay 
un Grundig y un nuevo 



Todus los meses* se sorteará entre todos los su se rip lores U na CZ 1000 


SUSCR1BITE HOY MISMO 

SUERTE!! 


NOMBRE .DOMICILIO __ ************ TEL- 

C.P, *.*,.*.«, LOCALIDAD CIUDAD.PROVINCIA *-- 

PAIS.* * EDAD__COMPUTADORA ,*>....*■* UTILIZACIGNs. 


Recorte esta ficha y envíela en un sobre a: 

Cerrílo 1320 1 Pilo (4010) Buenos Aíres ARGENTINA, 


FIEMA 


fe ■ ■ fe ■ *4 


nos 1 -2-3.4-5 AGOTADOS 


SOLICITUD DE SUSCRIPCION 

Deseo suscribirme a ¡í 64por ul período de Unieses □ I año □ desde el N c .al N" 

pira lo cus] aójenlo Cheque,'Giro Postal „.. c.'Bco- . 

Suscripción Ó 3.- KM: Obsequiaré una calcomanía 

Suscripción 1 añó A 1&-- KM: Obsequiara 1 Catadle uun juego 

CHEQUES A LA ORDEN DE EDITORIAL EftÜEDl SA. 

























da efe monitor. Loa pre¬ 
cios son parecidos, safen 
un poco menos /os moni¬ 
tores monocromáticos, 
pero (a resolución de un 
monitor es tejos mejor 
que la de un jv f 
9} Estamos en eso. Espe¬ 
ro que las demás consul¬ 
tas tuyas las sepa algún 
otro poseedor de una TK 
2000, que sí nos escribe 
con gusto las publicare¬ 
mos Respecto a /os cur¬ 
sos, hay muchos. Lo im¬ 
portante es ver qué ofre¬ 
cen. 


POKES 

PELIGROSOS 

Como ya Jes expresé en 
otra oportunidad, consi* 
dero que en vuestra pu¬ 
blicación —que es tam¬ 
bién un poco nuestra— 
no existen cosas que no 
me gusten y por el contra' 


me agradan; st tengo en 
cuenta que K64 viene a 
lienar un vacío en eJ país 
de ilustración y aprendi¬ 
zaje en el tema día a día 
más difundido en nues¬ 
tro medio- 

No obstante efío, me per- 
mJto sugerir traten de me¬ 
jorar aún un poco más la 
calidad de impresión de 
los programas. 

Asimismo aprovecho pa¬ 
ra consultar ¿por qué 
cuando utilizo algunos 
pokes en mi TS2GÉ8 se 
produce un NEW? ¿Es 
anormal? 

Néstor R. Maziili 
La Plata 


K64 

No es anormal, al con¬ 
trario, , es la propia má¬ 
quina la que se protege 
de POKES interpuestos e 
indiscretos! Sucede que 
seguramente esté entran- 


de SfStema que no pueden 
ser alteradas así porque 
sí y, como consecuencia r 
se cae ef sistema con un 
“NEW". 

INTERFACE 1 

¿Es posible que me en¬ 
víen datos sobre la ínter- 
fase 1 para la TS2068 ya 
que la utilizaría para aco¬ 
plarla a un Módem y po¬ 
der usarla en RTTY? Va la 
he usado en CW con óp¬ 
timos resultados. 

Enrique Ledercq 
Talar LU2EON 

K64 

La Inferiase 1 no es direc¬ 
tamente compatible en 
su conector con la TS 
2068 y además tenemos 
noticias de que no es la 
ideal para manejar un mo¬ 
dem l Si conseguimos ma¬ 
yor información sobre el 
tema la publicaremos. 


Estimados amigos, me di¬ 
rijo a ustedes para que 
me ayuden cómo hacer 
para obtener una línea 1 
REM de la longitud que 
quiera; hice vahas prue¬ 
bas pero no funcionaron, 
Miguel A. Berton 
Rosario 

K64 

Te recomendamos que 
uses el generador de REM 
que publicamos en el pro¬ 
grama del simulador de 
vuelo, pero modificando 
eí error que se escapó y 
que apareció la corrección 
en el N° ó (DEBUGGtNG), 
Lo podrás utilizar para 
cualquier iongitud que 
desees, siempre que fe 
alcance ia memoria dis¬ 
ponible. 


_SORTEO-ENCUESTA K64 

_ LLENE ESTE CUPON Y PARTICIPE DEL SORTEO MENSUAL 

*Jk 50 PREMIOS: 

-‘l# 1 40 CASSETTES Y 10 BECAS PARA CURSOS BASIC 


NOMBRE; 


EDAD_ OCUPACION:... w . „,, + . TEL: . 


UIRECCÍON:, 


C,P,¡ . „.,. LOCALIDAD; 


PCÍA: 


--—---_ENCULSTA_____ 

G O M P1 T \DORA; □ CZ 1DQU □ CZ 1500 □ CZ 20ÍU1 □ TIMEX C TK && Q TK «5 C TK &fl 





□ C-lfi □ C-64 □ TI 99/4A □ Otra^ ,. 

■1 ■ + R + C 

f i r ■ ■ i ■ r ■ 

. □ NO TENGO AUN 




ME GUSTARIA VER: 



MAS 

[GUAL MENOS 

PROGRAMAS DE APLICACION ESPECIFICA 

MAS 

IGUAL MENOS 


□ 

□ 

□ 

□ 

□ 

□ 

JUEGOS 

□ 

□ 

□ 

PROGRAMAS EX BASIC 




C A LIE] C AC [ÜN DESGRtpri V A ÜE. 

□ 

□ 

□ 

PROGRAMAS EX LOGO 

Q 

□ 

□ 

PROGRAMAS DE JUEGO 

□ 

□ 

□ 

PROGRAMAS E\ LENGUAJE DE MAQUINA 

□ 

□ 

O 

PR OC R AMAS DE A P Ll C Ar; J OXES . .O M ERC [ A LES 

□ 

□ 

□ 

PROGRAMAS EX OTROS LENGUAJES 

D 

□ 

o 

f RfH'iR AM AS EDITO AT[VOS 

n 

D 

□ 

ANALISIS DETALLADOS DE LOS PROGRAMAS 

□ 

□ 

□ 

HARDWARE 

n 

Q 

□ 

NOTAS PARA PEGGINERS 






QUE ES LO QUE MAS TE GUSTA DE K647 
QUE ES LO QUE MENOS TE GUSTA? 


Enviarlo a: K$4 C am p utación Para Todos - Cerrito 1520 I o flOlü) Buenos Aires, Rep. Argentina 
























































VIDEO 

JUEGOS 


en castellano 

para microcomputadoras 



h 


• Sistema concord de 
altísima velocidad (*) 

• Instrucciones en castellano 

COMPATIBLE PARA 

• SPECTRUM 

• TK 90 


PROXIMAMENTE SINCLAIR 1000 TK 83/85 CON 
SISTEMA CONCORD Y COMMODQRE 64 


PIDALOS 
EN NEGOCIOS 
DE COMPUTACION 
Y DISQUERIAS 


nuca sbft Belgrano 3896 (1210) Capital Tel. 982-0355/9645 





















queUd. puede usar 



El único limite del mk-rocomputador MICRODJGITALTK85 es “SU IMAGINACION 1 '. 


OPCIONALES; 

* Joystick (órgano de comando externo), para juegos de video * Generador de sonidí 
m Ex pan sor de memoria de 64 Kbytes RAM ■ Impresora directa * Program de 
&PRÜM * Interface para conexión de impresora profesional (paralela). 


* l'KBS, fue especialmente disecado y 
construido para que Ud* lo use con extrema simplicidad. 
* Sólo basta consultar su ameno y completo manual 
de instrucciones, en Castellano por supuesto, y Ud. podrá 
Jtler computación en forma fácil, rápida y práctica y en lenguaje BASIC, 

A partir de allí Ud. podrá preparar sus propios programas, o tambiér 
utilizar centenares de programas que existen en el mercado para estudiar; 
matemáticas; física; química; biología; música; catalogar dientes; controlar stocks; 
programar compras y ventas; controlar su cuenta barcaria; poner en orden gastos e 
un puestos en su hogar; jugar ajedrez; backgamond; y ¿por qu¿ no'? con su exclusivo 
joystick disfrutar de los más fantásticos video juegos; guerra de tas galaxias, invasores 
espaciales; etc r y todo io que Ud. puede imaginar. 


* JOYSTICK 
(órgano de comando externo) 

j opcional l 


LXPANSOEÍ. 

DL 7 MEMORIA 
64 Kbytes RAM 
t opcional) 




/WCRODIGML TK-05 


GARANTIA: 6 MES ES 


1 


importa y distribuye: AK V ÍK s.u.Ll Xi 
A veta. 1>IA7 YKÍ IVA 4147 ti 2001 Capí luí IrL: VKI-lVKd <n\l 


mi vtiila 4-1 1.Lummius (li 1 nik'rwMpuladim. Jirtuuh^ dvl liiiyir i Uvi¡ i-mb. IVitagraliii t IllínTiaü, 













































